Step
*
1
of Lemma
assert-isvarterm
1. ∀[opr:Type]. term(opr) ≡ coterm-fun(opr;term(opr))
2. [opr] : Type
3. term(opr) ≡ coterm-fun(opr;term(opr))
4. t : term(opr)
5. ↑isvarterm(t)
⊢ ∃v:{v:varname()| ¬(v = nullvar() ∈ varname())} . (t = varterm(v) ∈ term(opr))
BY
{ (MoveToConcl (-1) THEN (GenConcl ⌜t = x ∈ coterm-fun(opr;term(opr))⌝⋅ THENA Auto) THEN ThinVar `t') }
1
1. ∀[opr:Type]. term(opr) ≡ coterm-fun(opr;term(opr))
2. [opr] : Type
3. term(opr) ≡ coterm-fun(opr;term(opr))
4. x : coterm-fun(opr;term(opr))
⊢ (↑isvarterm(x)) 
⇒ (∃v:{v:varname()| ¬(v = nullvar() ∈ varname())} . (x = varterm(v) ∈ term(opr)))
Latex:
Latex:
1.  \mforall{}[opr:Type].  term(opr)  \mequiv{}  coterm-fun(opr;term(opr))
2.  [opr]  :  Type
3.  term(opr)  \mequiv{}  coterm-fun(opr;term(opr))
4.  t  :  term(opr)
5.  \muparrow{}isvarterm(t)
\mvdash{}  \mexists{}v:\{v:varname()|  \mneg{}(v  =  nullvar())\}  .  (t  =  varterm(v))
By
Latex:
(MoveToConcl  (-1)  THEN  (GenConcl  \mkleeneopen{}t  =  x\mkleeneclose{}\mcdot{}  THENA  Auto)  THEN  ThinVar  `t')
Home
Index