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

Theorem funcnvuni 4988
Description: The union of a chain (with respect to inclusion) of single-rooted sets is single-rooted. (See funcnv 4980 for "single-rooted" definition.) (Contributed by NM, 11-Aug-2004.)
Assertion
Ref Expression
funcnvuni (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → Fun 𝐴)
Distinct variable group:   𝑓,𝑔,𝐴

Proof of Theorem funcnvuni
Dummy variables 𝑥 𝑦 𝑧 𝑤 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cnveq 4527 . . . . . . . 8 (𝑥 = 𝑣𝑥 = 𝑣)
21eqeq2d 2092 . . . . . . 7 (𝑥 = 𝑣 → (𝑧 = 𝑥𝑧 = 𝑣))
32cbvrexv 2578 . . . . . 6 (∃𝑥𝐴 𝑧 = 𝑥 ↔ ∃𝑣𝐴 𝑧 = 𝑣)
4 cnveq 4527 . . . . . . . . . . 11 (𝑓 = 𝑣𝑓 = 𝑣)
54funeqd 4943 . . . . . . . . . 10 (𝑓 = 𝑣 → (Fun 𝑓 ↔ Fun 𝑣))
6 sseq1 3020 . . . . . . . . . . . 12 (𝑓 = 𝑣 → (𝑓𝑔𝑣𝑔))
7 sseq2 3021 . . . . . . . . . . . 12 (𝑓 = 𝑣 → (𝑔𝑓𝑔𝑣))
86, 7orbi12d 739 . . . . . . . . . . 11 (𝑓 = 𝑣 → ((𝑓𝑔𝑔𝑓) ↔ (𝑣𝑔𝑔𝑣)))
98ralbidv 2368 . . . . . . . . . 10 (𝑓 = 𝑣 → (∀𝑔𝐴 (𝑓𝑔𝑔𝑓) ↔ ∀𝑔𝐴 (𝑣𝑔𝑔𝑣)))
105, 9anbi12d 456 . . . . . . . . 9 (𝑓 = 𝑣 → ((Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) ↔ (Fun 𝑣 ∧ ∀𝑔𝐴 (𝑣𝑔𝑔𝑣))))
1110rspcv 2697 . . . . . . . 8 (𝑣𝐴 → (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → (Fun 𝑣 ∧ ∀𝑔𝐴 (𝑣𝑔𝑔𝑣))))
12 funeq 4941 . . . . . . . . . 10 (𝑧 = 𝑣 → (Fun 𝑧 ↔ Fun 𝑣))
1312biimprcd 158 . . . . . . . . 9 (Fun 𝑣 → (𝑧 = 𝑣 → Fun 𝑧))
14 sseq2 3021 . . . . . . . . . . . . . . 15 (𝑔 = 𝑥 → (𝑣𝑔𝑣𝑥))
15 sseq1 3020 . . . . . . . . . . . . . . 15 (𝑔 = 𝑥 → (𝑔𝑣𝑥𝑣))
1614, 15orbi12d 739 . . . . . . . . . . . . . 14 (𝑔 = 𝑥 → ((𝑣𝑔𝑔𝑣) ↔ (𝑣𝑥𝑥𝑣)))
1716rspcv 2697 . . . . . . . . . . . . 13 (𝑥𝐴 → (∀𝑔𝐴 (𝑣𝑔𝑔𝑣) → (𝑣𝑥𝑥𝑣)))
18 cnvss 4526 . . . . . . . . . . . . . . . 16 (𝑣𝑥𝑣𝑥)
19 cnvss 4526 . . . . . . . . . . . . . . . 16 (𝑥𝑣𝑥𝑣)
2018, 19orim12i 708 . . . . . . . . . . . . . . 15 ((𝑣𝑥𝑥𝑣) → (𝑣𝑥𝑥𝑣))
21 sseq12 3022 . . . . . . . . . . . . . . . . 17 ((𝑧 = 𝑣𝑤 = 𝑥) → (𝑧𝑤𝑣𝑥))
2221ancoms 264 . . . . . . . . . . . . . . . 16 ((𝑤 = 𝑥𝑧 = 𝑣) → (𝑧𝑤𝑣𝑥))
23 sseq12 3022 . . . . . . . . . . . . . . . 16 ((𝑤 = 𝑥𝑧 = 𝑣) → (𝑤𝑧𝑥𝑣))
2422, 23orbi12d 739 . . . . . . . . . . . . . . 15 ((𝑤 = 𝑥𝑧 = 𝑣) → ((𝑧𝑤𝑤𝑧) ↔ (𝑣𝑥𝑥𝑣)))
2520, 24syl5ibrcom 155 . . . . . . . . . . . . . 14 ((𝑣𝑥𝑥𝑣) → ((𝑤 = 𝑥𝑧 = 𝑣) → (𝑧𝑤𝑤𝑧)))
2625expd 254 . . . . . . . . . . . . 13 ((𝑣𝑥𝑥𝑣) → (𝑤 = 𝑥 → (𝑧 = 𝑣 → (𝑧𝑤𝑤𝑧))))
2717, 26syl6com 35 . . . . . . . . . . . 12 (∀𝑔𝐴 (𝑣𝑔𝑔𝑣) → (𝑥𝐴 → (𝑤 = 𝑥 → (𝑧 = 𝑣 → (𝑧𝑤𝑤𝑧)))))
2827rexlimdv 2476 . . . . . . . . . . 11 (∀𝑔𝐴 (𝑣𝑔𝑔𝑣) → (∃𝑥𝐴 𝑤 = 𝑥 → (𝑧 = 𝑣 → (𝑧𝑤𝑤𝑧))))
2928com23 77 . . . . . . . . . 10 (∀𝑔𝐴 (𝑣𝑔𝑔𝑣) → (𝑧 = 𝑣 → (∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧))))
3029alrimdv 1797 . . . . . . . . 9 (∀𝑔𝐴 (𝑣𝑔𝑔𝑣) → (𝑧 = 𝑣 → ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧))))
3113, 30anim12ii 335 . . . . . . . 8 ((Fun 𝑣 ∧ ∀𝑔𝐴 (𝑣𝑔𝑔𝑣)) → (𝑧 = 𝑣 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))))
3211, 31syl6com 35 . . . . . . 7 (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → (𝑣𝐴 → (𝑧 = 𝑣 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧))))))
3332rexlimdv 2476 . . . . . 6 (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → (∃𝑣𝐴 𝑧 = 𝑣 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))))
343, 33syl5bi 150 . . . . 5 (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → (∃𝑥𝐴 𝑧 = 𝑥 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))))
3534alrimiv 1795 . . . 4 (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → ∀𝑧(∃𝑥𝐴 𝑧 = 𝑥 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))))
36 df-ral 2353 . . . . 5 (∀𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧)) ↔ ∀𝑧(𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} → (Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧))))
37 vex 2604 . . . . . . . 8 𝑧 ∈ V
38 eqeq1 2087 . . . . . . . . 9 (𝑦 = 𝑧 → (𝑦 = 𝑥𝑧 = 𝑥))
3938rexbidv 2369 . . . . . . . 8 (𝑦 = 𝑧 → (∃𝑥𝐴 𝑦 = 𝑥 ↔ ∃𝑥𝐴 𝑧 = 𝑥))
4037, 39elab 2738 . . . . . . 7 (𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} ↔ ∃𝑥𝐴 𝑧 = 𝑥)
41 eqeq1 2087 . . . . . . . . . 10 (𝑦 = 𝑤 → (𝑦 = 𝑥𝑤 = 𝑥))
4241rexbidv 2369 . . . . . . . . 9 (𝑦 = 𝑤 → (∃𝑥𝐴 𝑦 = 𝑥 ↔ ∃𝑥𝐴 𝑤 = 𝑥))
4342ralab 2752 . . . . . . . 8 (∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧) ↔ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))
4443anbi2i 444 . . . . . . 7 ((Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧)) ↔ (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧))))
4540, 44imbi12i 237 . . . . . 6 ((𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} → (Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧))) ↔ (∃𝑥𝐴 𝑧 = 𝑥 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))))
4645albii 1399 . . . . 5 (∀𝑧(𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} → (Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧))) ↔ ∀𝑧(∃𝑥𝐴 𝑧 = 𝑥 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))))
4736, 46bitr2i 183 . . . 4 (∀𝑧(∃𝑥𝐴 𝑧 = 𝑥 → (Fun 𝑧 ∧ ∀𝑤(∃𝑥𝐴 𝑤 = 𝑥 → (𝑧𝑤𝑤𝑧)))) ↔ ∀𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧)))
4835, 47sylib 120 . . 3 (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → ∀𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧)))
49 fununi 4987 . . 3 (∀𝑧 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (Fun 𝑧 ∧ ∀𝑤 ∈ {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥} (𝑧𝑤𝑤𝑧)) → Fun {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥})
5048, 49syl 14 . 2 (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → Fun {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥})
51 cnvuni 4539 . . . 4 𝐴 = 𝑥𝐴 𝑥
52 vex 2604 . . . . . 6 𝑥 ∈ V
5352cnvex 4876 . . . . 5 𝑥 ∈ V
5453dfiun2 3712 . . . 4 𝑥𝐴 𝑥 = {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥}
5551, 54eqtri 2101 . . 3 𝐴 = {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥}
5655funeqi 4942 . 2 (Fun 𝐴 ↔ Fun {𝑦 ∣ ∃𝑥𝐴 𝑦 = 𝑥})
5750, 56sylibr 132 1 (∀𝑓𝐴 (Fun 𝑓 ∧ ∀𝑔𝐴 (𝑓𝑔𝑔𝑓)) → Fun 𝐴)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  wb 103  wo 661  wal 1282   = wceq 1284  wcel 1433  {cab 2067  wral 2348  wrex 2349  wss 2973   cuni 3601   ciun 3678  ccnv 4362  Fun wfun 4916
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-13 1444  ax-14 1445  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063  ax-sep 3896  ax-pow 3948  ax-pr 3964  ax-un 4188
This theorem depends on definitions:  df-bi 115  df-3an 921  df-tru 1287  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-ral 2353  df-rex 2354  df-v 2603  df-un 2977  df-in 2979  df-ss 2986  df-pw 3384  df-sn 3404  df-pr 3405  df-op 3407  df-uni 3602  df-iun 3680  df-br 3786  df-opab 3840  df-id 4048  df-xp 4369  df-rel 4370  df-cnv 4371  df-co 4372  df-dm 4373  df-rn 4374  df-fun 4924
This theorem is referenced by:  fun11uni  4989
  Copyright terms: Public domain W3C validator