AH
let! firstLine = reader.ReadLineAsync()
line <- firstLine
Size: a a a
AH
AH
VK
VK
let mutable line: string = null
while (line <- reader.ReadLine(); line <> null) do
...
AH
AH
AH
VS
VK
AH
AH
AH
VS
оГ
AH
VS
let rec readLine (reader:StringReader) =
async{
let line = reader.ReadLine()
if(line <> null) then return! readLine reader
}
VS
VS
AH
AH