11 lines
233 B
Text
11 lines
233 B
Text
|
λ(nix : ../NixPrelude.dhall) →
|
||
|
|
let nonPositive = ./nonPositive.dhall nix
|
||
|
|
|
||
|
|
let nonNegative = ./nonNegative.dhall nix
|
||
|
|
|
||
|
|
let isZero
|
||
|
|
: Double → Bool
|
||
|
|
= λ(v : Double) → nonPositive v && nonNegative v
|
||
|
|
|
||
|
|
in isZero
|