---

Step * of Lemma hdf-sqequal8-4

∀[C,a,b,F:Top].
  (case C of inl(x1) => let x ⟵ a in F[x] | inr(y1) => let x ⟵ b in F[x] ~ let x ⟵ case C
                                                                              of inl(x1) =>
                                                                              a
                                                                              | inr(y1) =>
                                                                              b
                                                                             in F[x])
BY
{ ((UnivCD THENA Auto) THEN LiftRed THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[C,a,b,F:Top].
    (case  C  of  inl(x1)  =>  let  x  \mleftarrow{}{}  a  in  F[x]  |  inr(y1)  =>  let  x  \mleftarrow{}{}  b  in  F[x]  \msim{}  let  x  \mleftarrow{}{}  case  C
                                                                                                                                                            of  inl(x1)  =>
                                                                                                                                                            a
                                                                                                                                                            |  inr(y1)  =>
                                                                                                                                                            b
                                                                                                                                                          in  F[x])


By

---

Latex:
((UnivCD  THENA  Auto)  THEN  LiftRed  THEN  Auto)

---

Home Index