Scanf.scanf"%s %s@\x09"(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)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page