1:
val expand : x : Expression -> Expression
"Разворачивает" тригонометрическое выражение на слагаемые
1: 2: 3: 4: 5:
"sin(2*x)+cos(2*x)" |> Infix.parseOrUndefined |> Trigonometric.expand |> Infix.format |> printfn "%s"
-sin(x)^2 + 2*sin(x)*cos(x) + cos(x)^2