(fun s->Printf.printf"%s%S"s s)"(fun s->Printf.printf\"%s%S\"s s)"