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) || supposing || g
BY
((Unfold `fpf-compatible` 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