---

Step * of Lemma spread-ext

∀[Pos:Type]. ∀[Mv:Pos ⟶ Type].  Spread(Pos;a.Mv[a]) ≡ a:Pos × (Mv[a] ⟶ Spread(Pos;a.Mv[a]))
BY
{ (Auto THEN Unfold `Spread` 0 THEN BLemma `corec-ext` THEN Auto THEN D 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[Pos:Type].  \mforall{}[Mv:Pos  {}\mrightarrow{}  Type].    Spread(Pos;a.Mv[a])  \mequiv{}  a:Pos  \mtimes{}  (Mv[a]  {}\mrightarrow{}  Spread(Pos;a.Mv[a]))


By

---

Latex:
(Auto  THEN  Unfold  `Spread`  0  THEN  BLemma  `corec-ext`  THEN  Auto  THEN  D  0  THEN  Auto)

---

Home Index