Step
*
2
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. v : {v:varname()| ¬(v = nullvar() ∈ varname())} 
6. t = varterm(v) ∈ term(opr)
⊢ ↑isvarterm(t)
BY
{ ((RWO "-1" 0 THEN Auto) THEN (Assert varterm(v) ∈ term(opr) BY Auto) THEN Auto) }
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.  v  :  \{v:varname()|  \mneg{}(v  =  nullvar())\} 
6.  t  =  varterm(v)
\mvdash{}  \muparrow{}isvarterm(t)
By
Latex:
((RWO  "-1"  0  THEN  Auto)  THEN  (Assert  varterm(v)  \mmember{}  term(opr)  BY  Auto)  THEN  Auto)
Home
Index