diff --git a/SoundGen/Program.fs b/SoundGen/Program.fs index 1c89506..6d3195c 100644 --- a/SoundGen/Program.fs +++ b/SoundGen/Program.fs @@ -9,9 +9,7 @@ open System type Note = { Name: string; Length: int } let parseNotes (input: string) = - let gluedString = input.Replace('\n', ' ') - - gluedString.Split(' ', StringSplitOptions.RemoveEmptyEntries) + input.Replace('\n', ' ').Split(' ', StringSplitOptions.RemoveEmptyEntries) |> Seq.map (fun noteStr -> let noteSigns = noteStr.Split('-') let name = noteSigns[0].Trim()