diff options
Diffstat (limited to 'src/Core/Term')
| -rw-r--r-- | src/Core/Term/NormalForm.idr | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/Core/Term/NormalForm.idr b/src/Core/Term/NormalForm.idr index 2cd16a1..fc7ed6e 100644 --- a/src/Core/Term/NormalForm.idr +++ b/src/Core/Term/NormalForm.idr @@ -28,6 +28,14 @@ public export NeutralTerm : Nat -> Type NeutralTerm n = Subset (Term n) Neutral +-- Impossibilities ------------------------------------------------------------- + +export +Uninhabited (Neutral Set) where uninhabited n impossible + +export +Uninhabited (Neutral $ Pi f g) where uninhabited n impossible + -- Inversion ------------------------------------------------------------------- invertNtrlApp : Neutral (App t u) -> Neutral t |