let rec(!)f g h=l(f h;f g)and l()=Scanf.scanf"%c%c"!print_char;;l()