File input/output: Difference between revisions

Content added Content deleted

Inline

@@ Line 788: / Line 788: @@
 =={{header|F Sharp|F#}}==
+Using an intermediate variable for the input file content is not ideomatic in functional programming. Nevertheless...
 <lang fsharp>open System.IO
+let copyFile fromTextFileName toTextFileName =
-let read = File.ReadAllText
+    let inputContent = File.ReadAllText fromTextFileName
-let write file text = File.WriteAllText(file, text)
+    inputContent |> fun text -> File.WriteAllText(toTextFileName, text)
+[<EntryPoint>]
-"input.txt" |> read |> write "output.txt"
+let main argv =
+    copyFile "input.txt" "output.txt"
 </lang>