Scanf.scanf"%s
%s@	"(fun s t->for i=0to 2010do print_char t.[if s>"e"then min(i*2)(4021-i*2)else(2011-i)*(i mod 2)+i/2]done)