Я пытаюсь сделать это в данный момент, но у меня не совсем решена подпись метода ... кто-нибудь? messages это поле seq [string]

let messageString = List.reduce(messages, fun (m1, m2) -> m1 + m2 + Environment.NewLine)