Step
*
of Lemma
fpf-restrict-compatible
∀[A:Type]. ∀[P:A ─→ 𝔹]. ∀[eq:EqDecider(A)]. ∀[B:A ─→ Type]. ∀[f,g:x:A fp-> B[x]].
  fpf-restrict(f;P) || g supposing f || g
BY
{ ((Unfold `fpf-compatible` 0 THEN Reduce 0)
   THEN Auto
   THEN (BackThruSomeHyp THEN Auto)
   THEN FLemma `fpf-restrict-dom` [-2]
   THEN Auto) }
Latex:
\mforall{}[A:Type].  \mforall{}[P:A  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[eq:EqDecider(A)].  \mforall{}[B:A  {}\mrightarrow{}  Type].  \mforall{}[f,g:x:A  fp->  B[x]].
    fpf-restrict(f;P)  ||  g  supposing  f  ||  g
By
((Unfold  `fpf-compatible`  0  THEN  Reduce  0)
  THEN  Auto
  THEN  (BackThruSomeHyp  THEN  Auto)
  THEN  FLemma  `fpf-restrict-dom`  [-2]
  THEN  Auto)
Home
Index