HOLE Home Higher-Order Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  HOLE Home  >  Th. List  >  eqcomx Unicode version

Theorem eqcomx 47
Description: Commutativity of equality.
Hypotheses
Ref Expression
eqcomx.1 |- A:al
eqcomx.2 |- B:al
eqcomx.3 |- R |= (( = A)B)
Assertion
Ref Expression
eqcomx |- R |= (( = B)A)

Proof of Theorem eqcomx
StepHypRef Expression
1 eqcomx.3 . . . 4 |- R |= (( = A)B)
21ax-cb1 29 . . 3 |- R:*
3 eqcomx.1 . . . 4 |- A:al
43ax-refl 39 . . 3 |- T. |= (( = A)A)
52, 4a1i 28 . 2 |- R |= (( = A)A)
6 weq 38 . . . . . 6 |- = :(al -> (al -> *))
76ax-refl 39 . . . . 5 |- T. |= (( = = ) = )
82, 7a1i 28 . . . 4 |- R |= (( = = ) = )
9 eqcomx.2 . . . . 5 |- B:al
106, 6, 3, 9ax-ceq 46 . . . 4 |- ((( = = ) = ), (( = A)B)) |= (( = ( = A))( = B))
118, 1, 10syl2anc 19 . . 3 |- R |= (( = ( = A))( = B))
126, 3wc 45 . . . 4 |- ( = A):(al -> *)
136, 9wc 45 . . . 4 |- ( = B):(al -> *)
1412, 13, 3, 3ax-ceq 46 . . 3 |- ((( = ( = A))( = B)), (( = A)A)) |= (( = (( = A)A))(( = B)A))
1511, 5, 14syl2anc 19 . 2 |- R |= (( = (( = A)A))(( = B)A))
165, 15ax-eqmp 42 1 |- R |= (( = B)A)
Colors of variables: type var term
Syntax hints:   -> ht 2  *hb 3  kc 5   = ke 7   |= wffMMJ2 11  wffMMJ2t 12
This theorem was proved from axioms:  ax-syl 15  ax-jca 17  ax-trud 26  ax-cb1 29  ax-refl 39  ax-eqmp 42  ax-ceq 46
This theorem is referenced by:  mpbirx  48  eqcomi  70
  Copyright terms: Public domain W3C validator