Step * 1 1 1 1 1 of Lemma orderedpair-second


1. coSet{i:l}
2. coSet{i:l}
3. coSet{i:l}
4. seteq(fst((a,b));a)
5. seteq(z;b)
⊢ (b ∈ ⋃((a,b)))
BY
(Unfold `orderedpairset` 0
   THEN (RWO "setmem-unionset" THENA Auto)
   THEN With ⌜{a,b}⌝ 
   THEN Auto
   THEN RWO  "setmem-pairset" 0
   THEN Auto) }


Latex:


Latex:

1.  a  :  coSet\{i:l\}
2.  b  :  coSet\{i:l\}
3.  z  :  coSet\{i:l\}
4.  seteq(fst((a,b));a)
5.  seteq(z;b)
\mvdash{}  (b  \mmember{}  \mcup{}((a,b)))


By


Latex:
(Unfold  `orderedpairset`  0
  THEN  (RWO  "setmem-unionset"  0  THENA  Auto)
  THEN  D  0  With  \mkleeneopen{}\{a,b\}\mkleeneclose{} 
  THEN  Auto
  THEN  RWO    "setmem-pairset"  0
  THEN  Auto)




Home Index