let dq = char_of_int 34 in
let tab = String.make 1 (char_of_int 9) in
let s = [|
    "let dq = char_of_int 34 in";
    "let tab = String.make 1 (char_of_int 9) in";
    "let s = [|";
    "|] in";
    "for i = 0 to 2 do print_endline s.(i); done;
for i = 0 to 4 do
    print_string tab;
    print_char dq;
    print_string s.(i);
    print_char dq;
    print_char ';';
    print_newline ();
done;
print_endline s.(3);
print_endline s.(4)"
|] in
for i = 0 to 2 do print_endline s.(i); done;
for i = 0 to 4 do
    print_string tab;
    print_char dq;
    print_string s.(i);
    print_char dq;
    print_char ';';
    print_newline ();
done;
print_endline s.(3);
print_endline s.(4)