open FParsec

​

let testParser =

    pstring "<desc>" .>>. spaces

    >>. manyCharsTill anyChar (spaces .>>? pstring "</desc>")

​

let result = run testParser "<desc> Flange width </desc>"

​

printfn "%O" result