Step
*
1
1
2
of Lemma
assert_of_eq_pair
1. s : DSet
2. t : DSet
3. a1 : |s|
4. a2 : |t|
5. b1 : |s|
6. b2 : |t|
7. <a1, a2> = <b1, b2> ∈ (|s| × |t|)
⊢ a1 = b1 ∈ |s|
BY
{ ((EqHD 7 THEN AbReduce (-2)) THEN Auto) }
Latex:
Latex:
1.  s  :  DSet
2.  t  :  DSet
3.  a1  :  |s|
4.  a2  :  |t|
5.  b1  :  |s|
6.  b2  :  |t|
7.  <a1,  a2>  =  <b1,  b2>
\mvdash{}  a1  =  b1
By
Latex:
((EqHD  7  THEN  AbReduce  (-2))  THEN  Auto)
Home
Index