let rec f s=s>""&()=Scanf.scanf"%1s@ "f;print_string s;;f" "