eval'N,*A='+$<.read.split*?, (1..2*N-4).map{|i|([i-N,0].max..i/2).map{|a|A[a]>(c=A[i-a])&&(A[i-a]=A[a];A[a]=c)}} $><