N = gets.to_i
A = gets.split.map(&:to_i)
B = A.map { |a| -a }

def lis(arr)
  len = arr.size
  dp = Array.new(len, Float::INFINITY)
  h1 = []

  len.times do |i|
    index = dp.bsearch_index { |x| x >= arr[i] }
    dp[index] = arr[i]
    h1.push(index)
  end

  dp2 = Array.new(len, Float::INFINITY)
  arr2 = arr.reverse
  h2 = []

  len.times do |i|
    index = dp2.bsearch_index { |x| x >= arr2[i] }
    dp2[index] = arr2[i]
    h2.unshift(index)
  end

  [*0...len].map { |i| [h1[i], h2[i]].min }.max
end

puts [lis(A), lis(B)].max