ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  elxp5 Structured version   GIF version

Theorem elxp5 4736
Description: Membership in a cross product requiring no quantifiers or dummy variables. Provides a slightly shorter version of elxp4 4735 when the double intersection does not create class existence problems (caused by int0 3603). (Contributed by NM, 1-Aug-2004.)
Assertion
Ref Expression
elxp5 (A (B × 𝐶) ↔ (A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶)))

Proof of Theorem elxp5
Dummy variables x y are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elex 2543 . 2 (A (B × 𝐶) → A V)
2 elex 2543 . . . 4 ( A B A V)
3 elex 2543 . . . 4 ( ran {A} 𝐶 ran {A} V)
42, 3anim12i 321 . . 3 (( A B ran {A} 𝐶) → ( A V ran {A} V))
5 opexgOLD 3939 . . . . 5 (( A V ran {A} V) → ⟨ A, ran {A}⟩ V)
65adantl 262 . . . 4 ((A = ⟨ A, ran {A}⟩ ( A V ran {A} V)) → ⟨ A, ran {A}⟩ V)
7 eleq1 2082 . . . . 5 (A = ⟨ A, ran {A}⟩ → (A V ↔ ⟨ A, ran {A}⟩ V))
87adantr 261 . . . 4 ((A = ⟨ A, ran {A}⟩ ( A V ran {A} V)) → (A V ↔ ⟨ A, ran {A}⟩ V))
96, 8mpbird 156 . . 3 ((A = ⟨ A, ran {A}⟩ ( A V ran {A} V)) → A V)
104, 9sylan2 270 . 2 ((A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶)) → A V)
11 elxp 4289 . . . 4 (A (B × 𝐶) ↔ xy(A = ⟨x, y (x B y 𝐶)))
12 sneq 3361 . . . . . . . . . . . . . 14 (A = ⟨x, y⟩ → {A} = {⟨x, y⟩})
1312rneqd 4490 . . . . . . . . . . . . 13 (A = ⟨x, y⟩ → ran {A} = ran {⟨x, y⟩})
1413unieqd 3565 . . . . . . . . . . . 12 (A = ⟨x, y⟩ → ran {A} = ran {⟨x, y⟩})
15 vex 2538 . . . . . . . . . . . . 13 x V
16 vex 2538 . . . . . . . . . . . . 13 y V
1715, 16op2nda 4732 . . . . . . . . . . . 12 ran {⟨x, y⟩} = y
1814, 17syl6req 2071 . . . . . . . . . . 11 (A = ⟨x, y⟩ → y = ran {A})
1918pm4.71ri 372 . . . . . . . . . 10 (A = ⟨x, y⟩ ↔ (y = ran {A} A = ⟨x, y⟩))
2019anbi1i 434 . . . . . . . . 9 ((A = ⟨x, y (x B y 𝐶)) ↔ ((y = ran {A} A = ⟨x, y⟩) (x B y 𝐶)))
21 anass 383 . . . . . . . . 9 (((y = ran {A} A = ⟨x, y⟩) (x B y 𝐶)) ↔ (y = ran {A} (A = ⟨x, y (x B y 𝐶))))
2220, 21bitri 173 . . . . . . . 8 ((A = ⟨x, y (x B y 𝐶)) ↔ (y = ran {A} (A = ⟨x, y (x B y 𝐶))))
2322exbii 1478 . . . . . . 7 (y(A = ⟨x, y (x B y 𝐶)) ↔ y(y = ran {A} (A = ⟨x, y (x B y 𝐶))))
24 snexgOLD 3909 . . . . . . . . . 10 (A V → {A} V)
25 rnexg 4524 . . . . . . . . . 10 ({A} V → ran {A} V)
2624, 25syl 14 . . . . . . . . 9 (A V → ran {A} V)
27 uniexg 4125 . . . . . . . . 9 (ran {A} V → ran {A} V)
2826, 27syl 14 . . . . . . . 8 (A V → ran {A} V)
29 opeq2 3524 . . . . . . . . . . 11 (y = ran {A} → ⟨x, y⟩ = ⟨x, ran {A}⟩)
3029eqeq2d 2033 . . . . . . . . . 10 (y = ran {A} → (A = ⟨x, y⟩ ↔ A = ⟨x, ran {A}⟩))
31 eleq1 2082 . . . . . . . . . . 11 (y = ran {A} → (y 𝐶 ran {A} 𝐶))
3231anbi2d 440 . . . . . . . . . 10 (y = ran {A} → ((x B y 𝐶) ↔ (x B ran {A} 𝐶)))
3330, 32anbi12d 445 . . . . . . . . 9 (y = ran {A} → ((A = ⟨x, y (x B y 𝐶)) ↔ (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))))
3433ceqsexgv 2650 . . . . . . . 8 ( ran {A} V → (y(y = ran {A} (A = ⟨x, y (x B y 𝐶))) ↔ (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))))
3528, 34syl 14 . . . . . . 7 (A V → (y(y = ran {A} (A = ⟨x, y (x B y 𝐶))) ↔ (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))))
3623, 35syl5bb 181 . . . . . 6 (A V → (y(A = ⟨x, y (x B y 𝐶)) ↔ (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))))
37 inteq 3592 . . . . . . . . . . . 12 (A = ⟨x, ran {A}⟩ → A = x, ran {A}⟩)
3837inteqd 3594 . . . . . . . . . . 11 (A = ⟨x, ran {A}⟩ → A = x, ran {A}⟩)
3938adantl 262 . . . . . . . . . 10 ((A V A = ⟨x, ran {A}⟩) → A = x, ran {A}⟩)
40 op1stbg 4160 . . . . . . . . . . . 12 ((x V ran {A} V) → x, ran {A}⟩ = x)
4115, 28, 40sylancr 395 . . . . . . . . . . 11 (A V → x, ran {A}⟩ = x)
4241adantr 261 . . . . . . . . . 10 ((A V A = ⟨x, ran {A}⟩) → x, ran {A}⟩ = x)
4339, 42eqtr2d 2055 . . . . . . . . 9 ((A V A = ⟨x, ran {A}⟩) → x = A)
4443ex 108 . . . . . . . 8 (A V → (A = ⟨x, ran {A}⟩ → x = A))
4544pm4.71rd 374 . . . . . . 7 (A V → (A = ⟨x, ran {A}⟩ ↔ (x = A A = ⟨x, ran {A}⟩)))
4645anbi1d 441 . . . . . 6 (A V → ((A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶)) ↔ ((x = A A = ⟨x, ran {A}⟩) (x B ran {A} 𝐶))))
47 anass 383 . . . . . . 7 (((x = A A = ⟨x, ran {A}⟩) (x B ran {A} 𝐶)) ↔ (x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))))
4847a1i 9 . . . . . 6 (A V → (((x = A A = ⟨x, ran {A}⟩) (x B ran {A} 𝐶)) ↔ (x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶)))))
4936, 46, 483bitrd 203 . . . . 5 (A V → (y(A = ⟨x, y (x B y 𝐶)) ↔ (x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶)))))
5049exbidv 1688 . . . 4 (A V → (xy(A = ⟨x, y (x B y 𝐶)) ↔ x(x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶)))))
5111, 50syl5bb 181 . . 3 (A V → (A (B × 𝐶) ↔ x(x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶)))))
52 eleq1 2082 . . . . . . 7 (x = A → (x V ↔ A V))
5315, 52mpbii 136 . . . . . 6 (x = A A V)
5453adantr 261 . . . . 5 ((x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))) → A V)
5554exlimiv 1471 . . . 4 (x(x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))) → A V)
562ad2antrl 463 . . . 4 ((A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶)) → A V)
57 opeq1 3523 . . . . . . 7 (x = A → ⟨x, ran {A}⟩ = ⟨ A, ran {A}⟩)
5857eqeq2d 2033 . . . . . 6 (x = A → (A = ⟨x, ran {A}⟩ ↔ A = ⟨ A, ran {A}⟩))
59 eleq1 2082 . . . . . . 7 (x = A → (x B A B))
6059anbi1d 441 . . . . . 6 (x = A → ((x B ran {A} 𝐶) ↔ ( A B ran {A} 𝐶)))
6158, 60anbi12d 445 . . . . 5 (x = A → ((A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶)) ↔ (A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶))))
6261ceqsexgv 2650 . . . 4 ( A V → (x(x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))) ↔ (A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶))))
6355, 56, 62pm5.21nii 607 . . 3 (x(x = A (A = ⟨x, ran {A}⟩ (x B ran {A} 𝐶))) ↔ (A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶)))
6451, 63syl6bb 185 . 2 (A V → (A (B × 𝐶) ↔ (A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶))))
651, 10, 64pm5.21nii 607 1 (A (B × 𝐶) ↔ (A = ⟨ A, ran {A}⟩ ( A B ran {A} 𝐶)))
Colors of variables: wff set class
Syntax hints:   wa 97  wb 98   = wceq 1228  wex 1362   wcel 1374  Vcvv 2535  {csn 3350  cop 3353   cuni 3554   cint 3589   × cxp 4270  ran crn 4273
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-io 617  ax-5 1316  ax-7 1317  ax-gen 1318  ax-ie1 1363  ax-ie2 1364  ax-8 1376  ax-10 1377  ax-11 1378  ax-i12 1379  ax-bnd 1380  ax-4 1381  ax-13 1385  ax-14 1386  ax-17 1400  ax-i9 1404  ax-ial 1409  ax-i5r 1410  ax-ext 2004  ax-sep 3849  ax-pow 3901  ax-pr 3918  ax-un 4120
This theorem depends on definitions:  df-bi 110  df-3an 875  df-tru 1231  df-nf 1330  df-sb 1628  df-eu 1885  df-mo 1886  df-clab 2009  df-cleq 2015  df-clel 2018  df-nfc 2149  df-ral 2289  df-rex 2290  df-v 2537  df-un 2899  df-in 2901  df-ss 2908  df-pw 3336  df-sn 3356  df-pr 3357  df-op 3359  df-uni 3555  df-int 3590  df-br 3739  df-opab 3793  df-xp 4278  df-rel 4279  df-cnv 4280  df-dm 4282  df-rn 4283
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator