def a :=
["def a :=", "def main := do
IO.println <| a[0]
IO.println <| a.map fun (x : String) ↦ \"\\\"\" ++ (x.replace \"\\\\\" \"\\\\\\\\\" |>.replace \"\\\"\" \"\\\\\\\"\") ++ \"\\\"\"
IO.println <| a[1]"]
def main := do
IO.println <| a[0]
IO.println <| a.map fun (x : String) ↦ "\"" ++ (x.replace "\\" "\\\\" |>.replace "\"" "\\\"") ++ "\""
IO.println <| a[1]