---

Step * of Lemma intlex-reflexive

∀[l1,l2:ℤ List].  l1 ≤_lex l2 = tt supposing l1 = l2 ∈ (ℤ List)
BY
{ (Auto
   THEN HypSubst' (-1) 0
   THEN Unfold `intlex` 0
   THEN RepeatFor 2 ((CallByValueReduce 0 THENA Auto))
   THEN (Subst' (||l2|| =z ||l2||) ~ tt 0 THENA Auto)
   THEN Reduce 0
   THEN RWO "intlex-aux-reflexive" 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[l1,l2:\mBbbZ{}  List].    l1  \mleq{}\_lex  l2  =  tt  supposing  l1  =  l2


By

---

Latex:
(Auto
  THEN  HypSubst'  (-1)  0
  THEN  Unfold  `intlex`  0
  THEN  RepeatFor  2  ((CallByValueReduce  0  THENA  Auto))
  THEN  (Subst'  (||l2||  =\msubz{}  ||l2||)  \msim{}  tt  0  THENA  Auto)
  THEN  Reduce  0
  THEN  RWO  "intlex-aux-reflexive"  0
  THEN  Auto)

---

Home Index