MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  dif1enlem Structured version   Visualization version   GIF version

Theorem dif1enlem 9189
Description: Lemma for rexdif1en 9190 and dif1en 9191. (Contributed by BTernaryTau, 18-Aug-2024.) Generalize to all ordinals and add a sethood requirement to avoid ax-un 7761. (Revised by BTernaryTau, 5-Jan-2025.)
Assertion
Ref Expression
dif1enlem (((𝐹 ∈ 𝑉 ∧ 𝐴 ∈ 𝑊 ∧ 𝑀 ∈ On) ∧ 𝐹:𝐴–1-1-onto→suc 𝑀) → (𝐴 ∖ {(◡𝐹‘𝑀)}) ≈ 𝑀)

Proof of Theorem dif1enlem
StepHypRef Expression
1 sucidg 6453 . . . . . 6 (𝑀 ∈ On → 𝑀 ∈ suc 𝑀)
2 dff1o3 6842 . . . . . . . . 9 (𝐹:𝐴–1-1-onto→suc 𝑀 ↔ (𝐹:𝐴–onto→suc 𝑀 ∧ Fun ◡𝐹))
32simprbi 503 . . . . . . . 8 (𝐹:𝐴–1-1-onto→suc 𝑀 → Fun ◡𝐹)
43adantr 486 . . . . . . 7 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → Fun ◡𝐹)
5 f1ofo 6843 . . . . . . . . 9 (𝐹:𝐴–1-1-onto→suc 𝑀 → 𝐹:𝐴–onto→suc 𝑀)
6 f1ofn 6836 . . . . . . . . . 10 (𝐹:𝐴–1-1-onto→suc 𝑀 → 𝐹 Fn 𝐴)
7 fnresdm 6669 . . . . . . . . . 10 (𝐹 Fn 𝐴 → (𝐹 ↾ 𝐴) = 𝐹)
8 foeq1 6803 . . . . . . . . . 10 ((𝐹 ↾ 𝐴) = 𝐹 → ((𝐹 ↾ 𝐴):𝐴–onto→suc 𝑀 ↔ 𝐹:𝐴–onto→suc 𝑀))
96, 7, 83syl 19 . . . . . . . . 9 (𝐹:𝐴–1-1-onto→suc 𝑀 → ((𝐹 ↾ 𝐴):𝐴–onto→suc 𝑀 ↔ 𝐹:𝐴–onto→suc 𝑀))
105, 9mpbird 260 . . . . . . . 8 (𝐹:𝐴–1-1-onto→suc 𝑀 → (𝐹 ↾ 𝐴):𝐴–onto→suc 𝑀)
1110adantr 486 . . . . . . 7 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (𝐹 ↾ 𝐴):𝐴–onto→suc 𝑀)
126adantr 486 . . . . . . . . 9 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → 𝐹 Fn 𝐴)
13 f1ocnvdm 7303 . . . . . . . . 9 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (◡𝐹‘𝑀) ∈ 𝐴)
14 f1ocnvfv2 7295 . . . . . . . . . 10 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (𝐹‘(◡𝐹‘𝑀)) = 𝑀)
15 snidg 4621 . . . . . . . . . . 11 (𝑀 ∈ suc 𝑀 → 𝑀 ∈ {𝑀})
1615adantl 487 . . . . . . . . . 10 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → 𝑀 ∈ {𝑀})
1714, 16eqeltrd 2864 . . . . . . . . 9 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (𝐹‘(◡𝐹‘𝑀)) ∈ {𝑀})
18 fressnfv 7175 . . . . . . . . . 10 ((𝐹 Fn 𝐴 ∧ (◡𝐹‘𝑀) ∈ 𝐴) → ((𝐹 ↾ {(◡𝐹‘𝑀)}):{(◡𝐹‘𝑀)}⟶{𝑀} ↔ (𝐹‘(◡𝐹‘𝑀)) ∈ {𝑀}))
1918biimp3ar 1499 . . . . . . . . 9 ((𝐹 Fn 𝐴 ∧ (◡𝐹‘𝑀) ∈ 𝐴 ∧ (𝐹‘(◡𝐹‘𝑀)) ∈ {𝑀}) → (𝐹 ↾ {(◡𝐹‘𝑀)}):{(◡𝐹‘𝑀)}⟶{𝑀})
2012, 13, 17, 19syl3anc 1398 . . . . . . . 8 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (𝐹 ↾ {(◡𝐹‘𝑀)}):{(◡𝐹‘𝑀)}⟶{𝑀})
21 disjsn 4672 . . . . . . . . . . . 12 ((𝐴 ∩ {(◡𝐹‘𝑀)}) = ∅ ↔ ¬ (◡𝐹‘𝑀) ∈ 𝐴)
2221con2bii 360 . . . . . . . . . . 11 ((◡𝐹‘𝑀) ∈ 𝐴 ↔ ¬ (𝐴 ∩ {(◡𝐹‘𝑀)}) = ∅)
2313, 22sylib 221 . . . . . . . . . 10 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → ¬ (𝐴 ∩ {(◡𝐹‘𝑀)}) = ∅)
24 fnresdisj 6670 . . . . . . . . . . . 12 (𝐹 Fn 𝐴 → ((𝐴 ∩ {(◡𝐹‘𝑀)}) = ∅ ↔ (𝐹 ↾ {(◡𝐹‘𝑀)}) = ∅))
256, 24syl 18 . . . . . . . . . . 11 (𝐹:𝐴–1-1-onto→suc 𝑀 → ((𝐴 ∩ {(◡𝐹‘𝑀)}) = ∅ ↔ (𝐹 ↾ {(◡𝐹‘𝑀)}) = ∅))
2625adantr 486 . . . . . . . . . 10 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → ((𝐴 ∩ {(◡𝐹‘𝑀)}) = ∅ ↔ (𝐹 ↾ {(◡𝐹‘𝑀)}) = ∅))
2723, 26mtbid 327 . . . . . . . . 9 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → ¬ (𝐹 ↾ {(◡𝐹‘𝑀)}) = ∅)
2827neqned 2966 . . . . . . . 8 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (𝐹 ↾ {(◡𝐹‘𝑀)}) ≠ ∅)
29 foconst 6822 . . . . . . . 8 (((𝐹 ↾ {(◡𝐹‘𝑀)}):{(◡𝐹‘𝑀)}⟶{𝑀} ∧ (𝐹 ↾ {(◡𝐹‘𝑀)}) ≠ ∅) → (𝐹 ↾ {(◡𝐹‘𝑀)}):{(◡𝐹‘𝑀)}–onto→{𝑀})
3020, 28, 29syl2anc 596 . . . . . . 7 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (𝐹 ↾ {(◡𝐹‘𝑀)}):{(◡𝐹‘𝑀)}–onto→{𝑀})
31 resdif 6857 . . . . . . 7 ((Fun ◡𝐹 ∧ (𝐹 ↾ 𝐴):𝐴–onto→suc 𝑀 ∧ (𝐹 ↾ {(◡𝐹‘𝑀)}):{(◡𝐹‘𝑀)}–onto→{𝑀}) → (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→(suc 𝑀 ∖ {𝑀}))
324, 11, 30, 31syl3anc 1398 . . . . . 6 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ suc 𝑀) → (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→(suc 𝑀 ∖ {𝑀}))
331, 32sylan2 605 . . . . 5 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ On) → (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→(suc 𝑀 ∖ {𝑀}))
34 eloni 6379 . . . . . . . 8 (𝑀 ∈ On → Ord 𝑀)
35 orddif 6468 . . . . . . . 8 (Ord 𝑀 → 𝑀 = (suc 𝑀 ∖ {𝑀}))
3634, 35syl 18 . . . . . . 7 (𝑀 ∈ On → 𝑀 = (suc 𝑀 ∖ {𝑀}))
3736f1oeq3d 6832 . . . . . 6 (𝑀 ∈ On → ((𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀 ↔ (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→(suc 𝑀 ∖ {𝑀})))
3837adantl 487 . . . . 5 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ On) → ((𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀 ↔ (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→(suc 𝑀 ∖ {𝑀})))
3933, 38mpbird 260 . . . 4 ((𝐹:𝐴–1-1-onto→suc 𝑀 ∧ 𝑀 ∈ On) → (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀)
4039ancoms 464 . . 3 ((𝑀 ∈ On ∧ 𝐹:𝐴–1-1-onto→suc 𝑀) → (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀)
41403ad2antl3 1206 . 2 (((𝐹 ∈ 𝑉 ∧ 𝐴 ∈ 𝑊 ∧ 𝑀 ∈ On) ∧ 𝐹:𝐴–1-1-onto→suc 𝑀) → (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀)
42 difexg 5295 . . 3 (𝐴 ∈ 𝑊 → (𝐴 ∖ {(◡𝐹‘𝑀)}) ∈ V)
43 resexg 6022 . . . 4 (𝐹 ∈ 𝑉 → (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})) ∈ V)
44 f1oen4g 9005 . . . 4 ((((𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})) ∈ V ∧ (𝐴 ∖ {(◡𝐹‘𝑀)}) ∈ V ∧ 𝑀 ∈ On) ∧ (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀) → (𝐴 ∖ {(◡𝐹‘𝑀)}) ≈ 𝑀)
4543, 44syl3anl1 1439 . . 3 (((𝐹 ∈ 𝑉 ∧ (𝐴 ∖ {(◡𝐹‘𝑀)}) ∈ V ∧ 𝑀 ∈ On) ∧ (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀) → (𝐴 ∖ {(◡𝐹‘𝑀)}) ≈ 𝑀)
4642, 45syl3anl2 1440 . 2 (((𝐹 ∈ 𝑉 ∧ 𝐴 ∈ 𝑊 ∧ 𝑀 ∈ On) ∧ (𝐹 ↾ (𝐴 ∖ {(◡𝐹‘𝑀)})):(𝐴 ∖ {(◡𝐹‘𝑀)})–1-1-onto→𝑀) → (𝐴 ∖ {(◡𝐹‘𝑀)}) ≈ 𝑀)
4741, 46syldan 603 1 (((𝐹 ∈ 𝑉 ∧ 𝐴 ∈ 𝑊 ∧ 𝑀 ∈ On) ∧ 𝐹:𝐴–1-1-onto→suc 𝑀) → (𝐴 ∖ {(◡𝐹‘𝑀)}) ≈ 𝑀)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1569   ∈ wcel 2146   ≠ wne 2959  Vcvv 3454   ∖ cdif 4048   ∩ cin 4092  ∅c0 4281  {csn 4588   class class class wbr 5106  ◡ccnv 5654   ↾ cres 5657  Ord word 6368  Oncon0 6369  suc csuc 6371  Fun wfun 6541   Fn wfn 6542  ⟶wf 6543  –onto→wfo 6545  –1-1-onto→wf1o 6546  ‘cfv 6547   ≈ cen 8984
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1944  ax-6 2001  ax-7 2042  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2196  ax-12 2215  ax-ext 2735  ax-sep 5252  ax-nul 5263  ax-pr 5395
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2101  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-ne 2960  df-ral 3081  df-rex 3091  df-reu 3370  df-rab 3417  df-v 3456  df-ss 3901  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-br 5107  df-opab 5171  df-tr 5216  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-ord 6372  df-on 6373  df-suc 6375  df-iota 6501  df-fun 6549  df-fn 6550  df-f 6551  df-f1 6552  df-fo 6553  df-f1o 6554  df-fv 6555  df-en 8988
This theorem is used by:  rexdif1en  9190  dif1en  9191
  Copyright terms: Public domain W3C validator