10 lines
244 B
Text
10 lines
244 B
Text
λ(nix : ../NixPrelude.dhall) →
|
|
let Any = ./Type.dhall
|
|
|
|
let Any/not = ./not.dhall nix
|
|
|
|
let Any/lor = ./lor.dhall nix
|
|
|
|
let Any/toAny = ./toAny.dhall nix
|
|
|
|
in λ(e1 : Any) → λ(e2 : Any) → Any/lor (Any/toAny Bool (Any/not e1)) e2
|