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

Theorem smogt 8413
Description: A strictly monotone ordinal function is greater than or equal to its argument. Exercise 1 in [TakeutiZaring] p. 50. (Contributed by Andrew Salmon, 23-Nov-2011.) (Revised by Mario Carneiro, 28-Feb-2013.)
Assertion
Ref Expression
smogt ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝐶 ∈ 𝐴) → 𝐶 ⊆ (𝐹‘𝐶))

Proof of Theorem smogt
Dummy variables 𝑦 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 id 23 . . . . . 6 (𝑥 = 𝐶 → 𝑥 = 𝐶)
2 fveq2 6916 . . . . . 6 (𝑥 = 𝐶 → (𝐹‘𝑥) = (𝐹‘𝐶))
31, 2sseq12d 3946 . . . . 5 (𝑥 = 𝐶 → (𝑥 ⊆ (𝐹‘𝑥) ↔ 𝐶 ⊆ (𝐹‘𝐶)))
43imbi2d 343 . . . 4 (𝑥 = 𝐶 → (((𝐹 Fn 𝐴 ∧ Smo 𝐹) → 𝑥 ⊆ (𝐹‘𝑥)) ↔ ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → 𝐶 ⊆ (𝐹‘𝐶))))
5 smodm2 8401 . . . . . . . . . 10 ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → Ord 𝐴)
653adant3 1150 . . . . . . . . 9 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → Ord 𝐴)
7 simp3 1156 . . . . . . . . 9 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴)
8 ordelord 6410 . . . . . . . . 9 ((Ord 𝐴 ∧ 𝑥 ∈ 𝐴) → Ord 𝑥)
96, 7, 8syl2anc 596 . . . . . . . 8 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → Ord 𝑥)
10 vex 3458 . . . . . . . . 9 𝑥 ∈ V
1110elon 6397 . . . . . . . 8 (𝑥 ∈ On ↔ Ord 𝑥)
129, 11sylibr 237 . . . . . . 7 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ On)
13 eleq1w 2847 . . . . . . . . . 10 (𝑥 = 𝑦 → (𝑥 ∈ 𝐴 ↔ 𝑦 ∈ 𝐴))
14133anbi3d 1471 . . . . . . . . 9 (𝑥 = 𝑦 → ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) ↔ (𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴)))
15 id 23 . . . . . . . . . 10 (𝑥 = 𝑦 → 𝑥 = 𝑦)
16 fveq2 6916 . . . . . . . . . 10 (𝑥 = 𝑦 → (𝐹‘𝑥) = (𝐹‘𝑦))
1715, 16sseq12d 3946 . . . . . . . . 9 (𝑥 = 𝑦 → (𝑥 ⊆ (𝐹‘𝑥) ↔ 𝑦 ⊆ (𝐹‘𝑦)))
1814, 17imbi12d 347 . . . . . . . 8 (𝑥 = 𝑦 → (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → 𝑥 ⊆ (𝐹‘𝑥)) ↔ ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴) → 𝑦 ⊆ (𝐹‘𝑦))))
19 simpl1 1210 . . . . . . . . . . . 12 (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝑥) → 𝐹 Fn 𝐴)
20 simpl2 1211 . . . . . . . . . . . 12 (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝑥) → Smo 𝐹)
21 ordtr1 6433 . . . . . . . . . . . . . . 15 (Ord 𝐴 → ((𝑦 ∈ 𝑥 ∧ 𝑥 ∈ 𝐴) → 𝑦 ∈ 𝐴))
2221expcomd 422 . . . . . . . . . . . . . 14 (Ord 𝐴 → (𝑥 ∈ 𝐴 → (𝑦 ∈ 𝑥 → 𝑦 ∈ 𝐴)))
236, 7, 22sylc 66 . . . . . . . . . . . . 13 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → (𝑦 ∈ 𝑥 → 𝑦 ∈ 𝐴))
2423imp 412 . . . . . . . . . . . 12 (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ 𝐴)
25 pm2.27 43 . . . . . . . . . . . 12 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴) → (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴) → 𝑦 ⊆ (𝐹‘𝑦)) → 𝑦 ⊆ (𝐹‘𝑦)))
2619, 20, 24, 25syl3anc 1399 . . . . . . . . . . 11 (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝑥) → (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴) → 𝑦 ⊆ (𝐹‘𝑦)) → 𝑦 ⊆ (𝐹‘𝑦)))
2726ralimdva 3178 . . . . . . . . . 10 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → (∀𝑦 ∈ 𝑥 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴) → 𝑦 ⊆ (𝐹‘𝑦)) → ∀𝑦 ∈ 𝑥 𝑦 ⊆ (𝐹‘𝑦)))
2853adant3 1150 . . . . . . . . . . . . . . . . . . 19 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → Ord 𝐴)
29 simp31 1228 . . . . . . . . . . . . . . . . . . 19 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → 𝑥 ∈ 𝐴)
3028, 29, 8syl2anc 596 . . . . . . . . . . . . . . . . . 18 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → Ord 𝑥)
31 simp32 1229 . . . . . . . . . . . . . . . . . 18 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → 𝑦 ∈ 𝑥)
32 ordelord 6410 . . . . . . . . . . . . . . . . . 18 ((Ord 𝑥 ∧ 𝑦 ∈ 𝑥) → Ord 𝑦)
3330, 31, 32syl2anc 596 . . . . . . . . . . . . . . . . 17 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → Ord 𝑦)
34 smofvon2 8402 . . . . . . . . . . . . . . . . . . 19 (Smo 𝐹 → (𝐹‘𝑥) ∈ On)
35343ad2ant2 1152 . . . . . . . . . . . . . . . . . 18 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → (𝐹‘𝑥) ∈ On)
36 eloni 6398 . . . . . . . . . . . . . . . . . 18 ((𝐹‘𝑥) ∈ On → Ord (𝐹‘𝑥))
3735, 36syl 18 . . . . . . . . . . . . . . . . 17 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → Ord (𝐹‘𝑥))
38 simp33 1230 . . . . . . . . . . . . . . . . 17 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → 𝑦 ⊆ (𝐹‘𝑦))
39 smoel2 8409 . . . . . . . . . . . . . . . . . . 19 (((𝐹 Fn 𝐴 ∧ Smo 𝐹) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥)) → (𝐹‘𝑦) ∈ (𝐹‘𝑥))
40393adantr3 1190 . . . . . . . . . . . . . . . . . 18 (((𝐹 Fn 𝐴 ∧ Smo 𝐹) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → (𝐹‘𝑦) ∈ (𝐹‘𝑥))
41403impa 1127 . . . . . . . . . . . . . . . . 17 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → (𝐹‘𝑦) ∈ (𝐹‘𝑥))
42 ordtr2 6434 . . . . . . . . . . . . . . . . . 18 ((Ord 𝑦 ∧ Ord (𝐹‘𝑥)) → ((𝑦 ⊆ (𝐹‘𝑦) ∧ (𝐹‘𝑦) ∈ (𝐹‘𝑥)) → 𝑦 ∈ (𝐹‘𝑥)))
4342imp 412 . . . . . . . . . . . . . . . . 17 (((Ord 𝑦 ∧ Ord (𝐹‘𝑥)) ∧ (𝑦 ⊆ (𝐹‘𝑦) ∧ (𝐹‘𝑦) ∈ (𝐹‘𝑥))) → 𝑦 ∈ (𝐹‘𝑥))
4433, 37, 38, 41, 43syl22anc 852 . . . . . . . . . . . . . . . 16 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦))) → 𝑦 ∈ (𝐹‘𝑥))
45443expia 1139 . . . . . . . . . . . . . . 15 ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝑥 ∧ 𝑦 ⊆ (𝐹‘𝑦)) → 𝑦 ∈ (𝐹‘𝑥)))
46453expd 1372 . . . . . . . . . . . . . 14 ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → (𝑥 ∈ 𝐴 → (𝑦 ∈ 𝑥 → (𝑦 ⊆ (𝐹‘𝑦) → 𝑦 ∈ (𝐹‘𝑥)))))
47463impia 1135 . . . . . . . . . . . . 13 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → (𝑦 ∈ 𝑥 → (𝑦 ⊆ (𝐹‘𝑦) → 𝑦 ∈ (𝐹‘𝑥))))
4847imp 412 . . . . . . . . . . . 12 (((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝑥) → (𝑦 ⊆ (𝐹‘𝑦) → 𝑦 ∈ (𝐹‘𝑥)))
4948ralimdva 3178 . . . . . . . . . . 11 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → (∀𝑦 ∈ 𝑥 𝑦 ⊆ (𝐹‘𝑦) → ∀𝑦 ∈ 𝑥 𝑦 ∈ (𝐹‘𝑥)))
50 dfss3 3902 . . . . . . . . . . 11 (𝑥 ⊆ (𝐹‘𝑥) ↔ ∀𝑦 ∈ 𝑥 𝑦 ∈ (𝐹‘𝑥))
5149, 50imbitrrdi 255 . . . . . . . . . 10 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → (∀𝑦 ∈ 𝑥 𝑦 ⊆ (𝐹‘𝑦) → 𝑥 ⊆ (𝐹‘𝑥)))
5227, 51syldc 49 . . . . . . . . 9 (∀𝑦 ∈ 𝑥 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴) → 𝑦 ⊆ (𝐹‘𝑦)) → ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → 𝑥 ⊆ (𝐹‘𝑥)))
5352a1i 11 . . . . . . . 8 (𝑥 ∈ On → (∀𝑦 ∈ 𝑥 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑦 ∈ 𝐴) → 𝑦 ⊆ (𝐹‘𝑦)) → ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → 𝑥 ⊆ (𝐹‘𝑥))))
5418, 53tfis2 7902 . . . . . . 7 (𝑥 ∈ On → ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → 𝑥 ⊆ (𝐹‘𝑥)))
5512, 54mpcom 39 . . . . . 6 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝑥 ∈ 𝐴) → 𝑥 ⊆ (𝐹‘𝑥))
56553expia 1139 . . . . 5 ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → (𝑥 ∈ 𝐴 → 𝑥 ⊆ (𝐹‘𝑥)))
5756com12 33 . . . 4 (𝑥 ∈ 𝐴 → ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → 𝑥 ⊆ (𝐹‘𝑥)))
584, 57vtoclga 3540 . . 3 (𝐶 ∈ 𝐴 → ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → 𝐶 ⊆ (𝐹‘𝐶)))
5958com12 33 . 2 ((𝐹 Fn 𝐴 ∧ Smo 𝐹) → (𝐶 ∈ 𝐴 → 𝐶 ⊆ (𝐹‘𝐶)))
60593impia 1135 1 ((𝐹 Fn 𝐴 ∧ Smo 𝐹 ∧ 𝐶 ∈ 𝐴) → 𝐶 ⊆ (𝐹‘𝐶))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147  ∀wral 3080   ⊆ wss 3900  Ord word 6387  Oncon0 6388   Fn wfn 6561  ‘cfv 6566  Smo wsmo 8391
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-sep 5255  ax-nul 5266  ax-pr 5398
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-rab 3417  df-v 3456  df-ss 3901  df-pss 4017  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 4841  df-uni 4873  df-br 5109  df-opab 5174  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-ord 6391  df-on 6392  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-fv 6574  df-smo 8392
This theorem is used by:  smocdmdom  8414  oismo  9571  maxssj0  36047
  Copyright terms: Public domain W3C validator