Exponential.contract

1:	`val contract : x : Expression -> Expression`

CompiledName: Contract

Описание

"Сокращает" математическое выражение с экспонентами

Пример

1: 
2: 
3: 
4: 
5: 
6:

let expr = "exp(2*x+y)/exp(x-y)" |> Infix.parseOrUndefined

expr
|> Exponential.contract
|> Infix.format
|> printfn "%s"

Вывод

1:	`exp(x + 2*y)`