Step
*
of Lemma
immediate-subterm-size
No Annotations
∀[opr:Type]. ∀[s,t:term(opr)].  (s < t 
⇒ term-size(s) < term-size(t))
BY
{ (Auto
   THEN D -1
   THEN ExRepD
   THEN (RWO "-1" 0 THENA Auto)
   THEN (RWO "-3" 0 THENA Auto)
   THEN Reduce 0
   THEN InstLemma `summand-le-lsum` [⌜varname() List × term(opr)⌝;⌜bts⌝;⌜λ2bt.term-size(snd(bt))⌝;⌜bts[i]⌝]⋅
   THEN Auto) }
Latex:
Latex:
No  Annotations
\mforall{}[opr:Type].  \mforall{}[s,t:term(opr)].    (s  <  t  {}\mRightarrow{}  term-size(s)  <  term-size(t))
By
Latex:
(Auto
  THEN  D  -1
  THEN  ExRepD
  THEN  (RWO  "-1"  0  THENA  Auto)
  THEN  (RWO  "-3"  0  THENA  Auto)
  THEN  Reduce  0
  THEN  InstLemma  `summand-le-lsum`  [\mkleeneopen{}varname()  List  \mtimes{}  term(opr)\mkleeneclose{};\mkleeneopen{}bts\mkleeneclose{};\mkleeneopen{}\mlambda{}\msubtwo{}bt.term-size(snd(bt))\mkleeneclose{};
  \mkleeneopen{}bts[i]\mkleeneclose{}]\mcdot{}
  THEN  Auto)
Home
Index