Step
*
of Lemma
fpf-restrict-compatible2
∀[A:Type]. ∀[P:A ─→ 𝔹]. ∀[eq:EqDecider(A)]. ∀[B:A ─→ Type]. ∀[f,g:x:A fp-> B[x]].
  f || fpf-restrict(g;P) supposing f || g
BY
{ (Auto THEN RepeatFor 2 (ParallelLast) THEN Reduce 0 THEN Auto THEN (FLemma `fpf-restrict-dom` [-1] 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]].
    f  ||  fpf-restrict(g;P)  supposing  f  ||  g
By
(Auto
  THEN  RepeatFor  2  (ParallelLast)
  THEN  Reduce  0
  THEN  Auto
  THEN  (FLemma  `fpf-restrict-dom`  [-1]  THEN  Auto)\mcdot{})
Home
Index