Step * 1 1 2 of Lemma assert_of_eq_pair


1. DSet
2. 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 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