diff options
Diffstat (limited to 'src/NormalForm.idr')
| -rw-r--r-- | src/NormalForm.idr | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/NormalForm.idr b/src/NormalForm.idr index f4697f5..ea3b2c0 100644 --- a/src/NormalForm.idr +++ b/src/NormalForm.idr @@ -36,6 +36,9 @@ record Normal (ctx : SnocList Ty) (ty : Ty) where -- Inversions ------------------------------------------------------------------ export +Uninhabited (IsNormal (Sub t sub)) where uninhabited (Ntrl prf) impossible + +export predNorm : IsNormal (Succ t) -> IsNormal t predNorm (Succ prf) = prf |