MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  en3lplem2 Structured version   Unicode version
Theorem en3lplem2 8028
Description: Lemma for en3lp 8029. (Contributed by Alan Sare, 28-Oct-2011.)
Assertion
Ref Expression
en3lplem2 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( x i^i { A , B , C } ) =/= (/) ) )
Distinct variable groups:   x, A   x, B   x, C
Proof of Theorem en3lplem2
StepHypRef Expression
1 en3lplem1 8027 . . . . 5 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x = A -> ( x i^i { A , B , C } ) =/= (/) ) )
2 en3lplem1 8027 . . . . . . . 8 |- ( ( B e. C /\ C e. A /\ A e. B ) -> ( x = B -> ( x i^i { B , C , A } ) =/= (/) ) )
323comr 1204 . . . . . . 7 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x = B -> ( x i^i { B , C , A } ) =/= (/) ) )
43a1d 25 . . . . . 6 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( x = B -> ( x i^i { B , C , A } ) =/= (/) ) ) )
5 tprot 4122 . . . . . . . . 9 |- { A , B , C } = { B , C , A }
65ineq2i 3697 . . . . . . . 8 |- ( x i^i { A , B , C } ) = ( x i^i { B , C , A } )
76neeq1i 2752 . . . . . . 7 |- ( ( x i^i { A , B , C } ) =/= (/) <-> ( x i^i { B , C , A } ) =/= (/) )
87bicomi 202 . . . . . 6 |- ( ( x i^i { B , C , A } ) =/= (/) <-> ( x i^i { A , B , C } ) =/= (/) )
94, 8syl8ib 231 . . . . 5 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( x = B -> ( x i^i { A , B , C } ) =/= (/) ) ) )
10 jao 512 . . . . 5 |- ( ( x = A -> ( x i^i { A , B , C } ) =/= (/) ) -> ( ( x = B -> ( x i^i { A , B , C } ) =/= (/) ) -> ( ( x = A \/ x = B ) -> ( x i^i { A , B , C } ) =/= (/) ) ) )
111, 9, 10sylsyld 56 . . . 4 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( ( x = A \/ x = B ) -> ( x i^i { A , B , C } ) =/= (/) ) ) )
1211imp 429 . . 3 |- ( ( ( A e. B /\ B e. C /\ C e. A ) /\ x e. { A , B , C } ) -> ( ( x = A \/ x = B ) -> ( x i^i { A , B , C } ) =/= (/) ) )
13 en3lplem1 8027 . . . . . . 7 |- ( ( C e. A /\ A e. B /\ B e. C ) -> ( x = C -> ( x i^i { C , A , B } ) =/= (/) ) )
14133coml 1203 . . . . . 6 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x = C -> ( x i^i { C , A , B } ) =/= (/) ) )
1514a1d 25 . . . . 5 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( x = C -> ( x i^i { C , A , B } ) =/= (/) ) ) )
16 tprot 4122 . . . . . . 7 |- { C , A , B } = { A , B , C }
1716ineq2i 3697 . . . . . 6 |- ( x i^i { C , A , B } ) = ( x i^i { A , B , C } )
1817neeq1i 2752 . . . . 5 |- ( ( x i^i { C , A , B } ) =/= (/) <-> ( x i^i { A , B , C } ) =/= (/) )
1915, 18syl8ib 231 . . . 4 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( x = C -> ( x i^i { A , B , C } ) =/= (/) ) ) )
2019imp 429 . . 3 |- ( ( ( A e. B /\ B e. C /\ C e. A ) /\ x e. { A , B , C } ) -> ( x = C -> ( x i^i { A , B , C } ) =/= (/) ) )
21 idd 24 . . . . . . 7 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> x e. { A , B , C } ) )
22 dftp2 4073 . . . . . . . 8 |- { A , B , C } = { x | ( x = A \/ x = B \/ x = C ) }
2322eleq2i 2545 . . . . . . 7 |- ( x e. { A , B , C } <-> x e. { x | ( x = A \/ x = B \/ x = C ) } )
2421, 23syl6ib 226 . . . . . 6 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> x e. { x | ( x = A \/ x = B \/ x = C ) } ) )
25 abid 2454 . . . . . 6 |- ( x e. { x | ( x = A \/ x = B \/ x = C ) } <-> ( x = A \/ x = B \/ x = C ) )
2624, 25syl6ib 226 . . . . 5 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( x = A \/ x = B \/ x = C ) ) )
27 df-3or 974 . . . . 5 |- ( ( x = A \/ x = B \/ x = C ) <-> ( ( x = A \/ x = B ) \/ x = C ) )
2826, 27syl6ib 226 . . . 4 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( ( x = A \/ x = B ) \/ x = C ) ) )
2928imp 429 . . 3 |- ( ( ( A e. B /\ B e. C /\ C e. A ) /\ x e. { A , B , C } ) -> ( ( x = A \/ x = B ) \/ x = C ) )
3012, 20, 29mpjaod 381 . 2 |- ( ( ( A e. B /\ B e. C /\ C e. A ) /\ x e. { A , B , C } ) -> ( x i^i { A , B , C } ) =/= (/) )
3130ex 434 1 |- ( ( A e. B /\ B e. C /\ C e. A ) -> ( x e. { A , B , C } -> ( x i^i { A , B , C } ) =/= (/) ) )
Colors of variables: wff setvar class
Syntax hints:   -> wi 4   \/ wo 368   /\ wa 369   \/ w3o 972   /\ w3a 973   = wceq 1379   e. wcel 1767   {cab 2452   =/= wne 2662   i^i cin 3475   (/)c0 3785   {ctp 4031
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1601  ax-4 1612  ax-5 1680  ax-6 1719  ax-7 1739  ax-10 1786  ax-11 1791  ax-12 1803  ax-13 1968  ax-ext 2445
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 974  df-3an 975  df-tru 1382  df-ex 1597  df-nf 1600  df-sb 1712  df-clab 2453  df-cleq 2459  df-clel 2462  df-nfc 2617  df-ne 2664  df-v 3115  df-dif 3479  df-un 3481  df-in 3483  df-nul 3786  df-sn 4028  df-pr 4030  df-tp 4032
This theorem is referenced by:  en3lp  8029
  Copyright terms: Public domain W3C validator