Step
*
of Lemma
lifted-rel_wf
∀[A,B:Type]. ∀[R:A ⟶ A ⟶ ℙ].  (lifted-rel(R) ∈ (A + B) ⟶ (A + B) ⟶ ℙ)
BY
{ (Auto THEN Unfold `lifted-rel` 0 THEN RepeatFor 2 (((MemCD THENA Auto) THEN D -1 THEN Reduce 0)) THEN Auto) }
Latex:
Latex:
\mforall{}[A,B:Type].  \mforall{}[R:A  {}\mrightarrow{}  A  {}\mrightarrow{}  \mBbbP{}].    (lifted-rel(R)  \mmember{}  (A  +  B)  {}\mrightarrow{}  (A  +  B)  {}\mrightarrow{}  \mBbbP{})
By
Latex:
(Auto
  THEN  Unfold  `lifted-rel`  0
  THEN  RepeatFor  2  (((MemCD  THENA  Auto)  THEN  D  -1  THEN  Reduce  0))
  THEN  Auto)
Home
Index