---

Step * of Lemma assert-fset-pairwise

∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[R:T ⟶ T ⟶ 𝔹]. ∀[s:fset(T)].
  uiff(↑fset-pairwise(x,y.R[x;y];s);∀x,y:T.  (↑R[x;y]) supposing (x ∈ s and y ∈ s))
BY
{ (((((UnivCD THENA Auto) THEN Unfold `fset-pairwise` 0) THEN Fold `fset-all` 0)
    THEN (InstLemma `fset-all-iff` [⌜T⌝;⌜eq⌝]⋅ THENA Auto)
    )
   THEN (RWO "-1" 0 THENA Auto)
   THEN Fold `fset-all` 0
   THEN Auto
   THEN (D 6 With ⌜x⌝  THENA Auto)
   THEN RWO  "5" (-1)
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[R:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[s:fset(T)].
    uiff(\muparrow{}fset-pairwise(x,y.R[x;y];s);\mforall{}x,y:T.    (\muparrow{}R[x;y])  supposing  (x  \mmember{}  s  and  y  \mmember{}  s))


By

---

Latex:
(((((UnivCD  THENA  Auto)  THEN  Unfold  `fset-pairwise`  0)  THEN  Fold  `fset-all`  0)
    THEN  (InstLemma  `fset-all-iff`  [\mkleeneopen{}T\mkleeneclose{};\mkleeneopen{}eq\mkleeneclose{}]\mcdot{}  THENA  Auto)
    )
  THEN  (RWO  "-1"  0  THENA  Auto)
  THEN  Fold  `fset-all`  0
  THEN  Auto
  THEN  (D  6  With  \mkleeneopen{}x\mkleeneclose{}    THENA  Auto)
  THEN  RWO    "5"  (-1)
  THEN  Auto)

---

Home Index