Minor cleanup
This commit is contained in:
parent
fc666956e2
commit
d925a8bcaa
1 changed files with 0 additions and 10 deletions
|
@ -144,16 +144,6 @@ with TRedSN {n} : PTm n -> PTm n -> Prop :=
|
|||
|
||||
Derive Dependent Inversion tred_inv with (forall n (a b : PTm n), TRedSN a b) Sort Prop.
|
||||
|
||||
Inductive SNe' {n} : PTm n -> Prop :=
|
||||
| N_Var' i :
|
||||
SNe' (VarPTm i)
|
||||
| N_App' a b :
|
||||
SNe a ->
|
||||
SNe' (PApp a b)
|
||||
| N_Proj' p a :
|
||||
SNe a ->
|
||||
SNe' (PProj p a).
|
||||
|
||||
Lemma PProjAbs_imp n p (a : PTm (S n)) :
|
||||
~ SN (PProj p (PAbs a)).
|
||||
Proof.
|
||||
|
|
Loading…
Add table
Reference in a new issue