Step
*
of Lemma
fpf-compatible-update2
∀[A:Type]. ∀[eq:EqDecider(A)]. ∀[B:A ─→ Type]. ∀[f,g:a:A fp-> B[a]].  f || f ⊕ g
BY
{ ((UnivCD THENA Auto) THEN D 0 THEN Auto THEN (RWO "fpf-join-ap-sq" 0 THENA Auto) THEN SplitOnConclITE THEN Auto) }
Latex:
\mforall{}[A:Type].  \mforall{}[eq:EqDecider(A)].  \mforall{}[B:A  {}\mrightarrow{}  Type].  \mforall{}[f,g:a:A  fp->  B[a]].    f  ||  f  \moplus{}  g
By
((UnivCD  THENA  Auto)
  THEN  D  0
  THEN  Auto
  THEN  (RWO  "fpf-join-ap-sq"  0  THENA  Auto)
  THEN  SplitOnConclITE
  THEN  Auto)
Home
Index