---

Step * of Lemma fpf-union-join_wf

∀[A:Type]. ∀[eq:EqDecider(A)]. ∀[B:A ─→ Type]. ∀[f,g:a:A fp-> B[a] List]. ∀[R:∩a:A. ((B[a] List) ─→ B[a] ─→ 𝔹)].
  (fpf-union-join(eq;R;f;g) ∈ a:A fp-> B[a] List)
BY
{ (Auto THEN Unfold `fpf-union-join` 0 THEN Unfold `fpf` 0 THEN Auto) }

---

Latex:


\mforall{}[A:Type].  \mforall{}[eq:EqDecider(A)].  \mforall{}[B:A  {}\mrightarrow{}  Type].  \mforall{}[f,g:a:A  fp->  B[a]  List].  \mforall{}[R:\mcap{}a:A
                                                                                                                                                                ((B[a]  List)
                                                                                                                                                                {}\mrightarrow{}  B[a]
                                                                                                                                                                {}\mrightarrow{}  \mBbbB{})].
    (fpf-union-join(eq;R;f;g)  \mmember{}  a:A  fp->  B[a]  List)


By

(Auto  THEN  Unfold  `fpf-union-join`  0  THEN  Unfold  `fpf`  0  THEN  Auto)

---

Home Index