Polynomial.isSquareFree

1:	`val isSquareFree : symbol : Expression -> x : Expression -> Boolean`

CompiledName: IsSquareFree

Описание

Проверяет, является ли полином свободным от квадратов.

Пример

 1: 
 2: 
 3: 
 4: 
 5: 
 6: 
 7: 
 8: 
 9: 
10:

let print = Infix.format >> printfn "%s"

let expr = "x^5 - x^3 - x^2 + 1" |> Infix.parseOrUndefined
let x = symbol "x"

print expr

expr
|> Polynomial.isSquareFree x
|> printfn "%b"

Вывод

1: 
2:

1 - x^2 - x^3 + x^5
false