1:
val collectTerms: symbol : Expression -> _arg1 : Expression -> Expression
Собирает полиномиальные термы
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
let expr = "3 + 4*x + 6*x*y + 12*x^2" |> Infix.parseOrUndefined expr |> Infix.format |> printfn "%s" let x = symbol "x" Polynomial.collectTerms x expr |> Infix.format |> printfn "%s"
1: 2:
3 + 4*x + 12*x^2 + 6*x*y 3 + 12*x^2 + x*(4 + 6*y)