open State
/// <exception cref="System.IOException">If the results cannot be exported</exception>
-let exportResults (state: State) (filePath: string) =
+let exportResults (state : State) (filePath : string) =
use writer = new StreamWriter(new FileStream(filePath, FileMode.Create, FileAccess.Write))
fprintfn writer "File: %s" state.FilePath
- fprintfn writer "Export date: %A" DateTime.Now
+ fprintfn writer "Export date: %O" DateTime.Now
fprintfn writer ""
fprintfn writer "Patient ID: %s" state.PatientID