---

Step * of Lemma length-merge-int

∀[T:Type]. ∀[as,bs:T List].  (||merge-int(bs;as)|| = (||bs|| + ||as||) ∈ ℤ) supposing T ⊆r ℤ
BY
{ (InductionOnList
   THEN Unfold `merge-int` 0
   THEN Reduce 0
   THEN Try (Fold `merge-int` 0)
   THEN Auto
   THEN RWO "length-insert-int" 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[as,bs:T  List].    (||merge-int(bs;as)||  =  (||bs||  +  ||as||))  supposing  T  \msubseteq{}r  \mBbbZ{}


By

---

Latex:
(InductionOnList
  THEN  Unfold  `merge-int`  0
  THEN  Reduce  0
  THEN  Try  (Fold  `merge-int`  0)
  THEN  Auto
  THEN  RWO  "length-insert-int"  0
  THEN  Auto)

---

Home Index