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

Theorem smores 8392
Description: A strictly monotone function restricted to an ordinal remains strictly monotone. (Contributed by Andrew Salmon, 16-Nov-2011.) (Proof shortened by Mario Carneiro, 5-Dec-2016.)
Assertion
Ref Expression
smores ((Smo 𝐴𝐵 ∈ dom 𝐴) → Smo (𝐴𝐵))

Proof of Theorem smores
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 funres 6608 . . . . . . . 8 (Fun 𝐴 → Fun (𝐴𝐵))
2 funfn 6596 . . . . . . . 8 (Fun 𝐴𝐴 Fn dom 𝐴)
3 funfn 6596 . . . . . . . 8 (Fun (𝐴𝐵) ↔ (𝐴𝐵) Fn dom (𝐴𝐵))
41, 2, 33imtr3i 291 . . . . . . 7 (𝐴 Fn dom 𝐴 → (𝐴𝐵) Fn dom (𝐴𝐵))
5 resss 6019 . . . . . . . . 9 (𝐴𝐵) ⊆ 𝐴
65rnssi 5951 . . . . . . . 8 ran (𝐴𝐵) ⊆ ran 𝐴
7 sstr 3992 . . . . . . . 8 ((ran (𝐴𝐵) ⊆ ran 𝐴 ∧ ran 𝐴 ⊆ On) → ran (𝐴𝐵) ⊆ On)
86, 7mpan 690 . . . . . . 7 (ran 𝐴 ⊆ On → ran (𝐴𝐵) ⊆ On)
94, 8anim12i 613 . . . . . 6 ((𝐴 Fn dom 𝐴 ∧ ran 𝐴 ⊆ On) → ((𝐴𝐵) Fn dom (𝐴𝐵) ∧ ran (𝐴𝐵) ⊆ On))
10 df-f 6565 . . . . . 6 (𝐴:dom 𝐴⟶On ↔ (𝐴 Fn dom 𝐴 ∧ ran 𝐴 ⊆ On))
11 df-f 6565 . . . . . 6 ((𝐴𝐵):dom (𝐴𝐵)⟶On ↔ ((𝐴𝐵) Fn dom (𝐴𝐵) ∧ ran (𝐴𝐵) ⊆ On))
129, 10, 113imtr4i 292 . . . . 5 (𝐴:dom 𝐴⟶On → (𝐴𝐵):dom (𝐴𝐵)⟶On)
1312a1i 11 . . . 4 (𝐵 ∈ dom 𝐴 → (𝐴:dom 𝐴⟶On → (𝐴𝐵):dom (𝐴𝐵)⟶On))
14 ordelord 6406 . . . . . . 7 ((Ord dom 𝐴𝐵 ∈ dom 𝐴) → Ord 𝐵)
1514expcom 413 . . . . . 6 (𝐵 ∈ dom 𝐴 → (Ord dom 𝐴 → Ord 𝐵))
16 ordin 6414 . . . . . . 7 ((Ord 𝐵 ∧ Ord dom 𝐴) → Ord (𝐵 ∩ dom 𝐴))
1716ex 412 . . . . . 6 (Ord 𝐵 → (Ord dom 𝐴 → Ord (𝐵 ∩ dom 𝐴)))
1815, 17syli 39 . . . . 5 (𝐵 ∈ dom 𝐴 → (Ord dom 𝐴 → Ord (𝐵 ∩ dom 𝐴)))
19 dmres 6030 . . . . . 6 dom (𝐴𝐵) = (𝐵 ∩ dom 𝐴)
20 ordeq 6391 . . . . . 6 (dom (𝐴𝐵) = (𝐵 ∩ dom 𝐴) → (Ord dom (𝐴𝐵) ↔ Ord (𝐵 ∩ dom 𝐴)))
2119, 20ax-mp 5 . . . . 5 (Ord dom (𝐴𝐵) ↔ Ord (𝐵 ∩ dom 𝐴))
2218, 21imbitrrdi 252 . . . 4 (𝐵 ∈ dom 𝐴 → (Ord dom 𝐴 → Ord dom (𝐴𝐵)))
23 dmss 5913 . . . . . . . . 9 ((𝐴𝐵) ⊆ 𝐴 → dom (𝐴𝐵) ⊆ dom 𝐴)
245, 23ax-mp 5 . . . . . . . 8 dom (𝐴𝐵) ⊆ dom 𝐴
25 ssralv 4052 . . . . . . . 8 (dom (𝐴𝐵) ⊆ dom 𝐴 → (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
2624, 25ax-mp 5 . . . . . . 7 (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
27 ssralv 4052 . . . . . . . . 9 (dom (𝐴𝐵) ⊆ dom 𝐴 → (∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
2824, 27ax-mp 5 . . . . . . . 8 (∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
2928ralimi 3083 . . . . . . 7 (∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
3026, 29syl 17 . . . . . 6 (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
31 inss1 4237 . . . . . . . . . . . . 13 (𝐵 ∩ dom 𝐴) ⊆ 𝐵
3219, 31eqsstri 4030 . . . . . . . . . . . 12 dom (𝐴𝐵) ⊆ 𝐵
33 simpl 482 . . . . . . . . . . . 12 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑥 ∈ dom (𝐴𝐵))
3432, 33sselid 3981 . . . . . . . . . . 11 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑥𝐵)
3534fvresd 6926 . . . . . . . . . 10 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → ((𝐴𝐵)‘𝑥) = (𝐴𝑥))
36 simpr 484 . . . . . . . . . . . 12 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑦 ∈ dom (𝐴𝐵))
3732, 36sselid 3981 . . . . . . . . . . 11 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑦𝐵)
3837fvresd 6926 . . . . . . . . . 10 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → ((𝐴𝐵)‘𝑦) = (𝐴𝑦))
3935, 38eleq12d 2835 . . . . . . . . 9 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → (((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦) ↔ (𝐴𝑥) ∈ (𝐴𝑦)))
4039imbi2d 340 . . . . . . . 8 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → ((𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)) ↔ (𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
4140ralbidva 3176 . . . . . . 7 (𝑥 ∈ dom (𝐴𝐵) → (∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)) ↔ ∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
4241ralbiia 3091 . . . . . 6 (∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)) ↔ ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
4330, 42sylibr 234 . . . . 5 (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)))
4443a1i 11 . . . 4 (𝐵 ∈ dom 𝐴 → (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦))))
4513, 22, 443anim123d 1445 . . 3 (𝐵 ∈ dom 𝐴 → ((𝐴:dom 𝐴⟶On ∧ Ord dom 𝐴 ∧ ∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))) → ((𝐴𝐵):dom (𝐴𝐵)⟶On ∧ Ord dom (𝐴𝐵) ∧ ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)))))
46 df-smo 8386 . . 3 (Smo 𝐴 ↔ (𝐴:dom 𝐴⟶On ∧ Ord dom 𝐴 ∧ ∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
47 df-smo 8386 . . 3 (Smo (𝐴𝐵) ↔ ((𝐴𝐵):dom (𝐴𝐵)⟶On ∧ Ord dom (𝐴𝐵) ∧ ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦))))
4845, 46, 473imtr4g 296 . 2 (𝐵 ∈ dom 𝐴 → (Smo 𝐴 → Smo (𝐴𝐵)))
4948impcom 407 1 ((Smo 𝐴𝐵 ∈ dom 𝐴) → Smo (𝐴𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1540  wcel 2108  wral 3061  cin 3950  wss 3951  dom cdm 5685  ran crn 5686  cres 5687  Ord word 6383  Oncon0 6384  Fun wfun 6555   Fn wfn 6556  wf 6557  cfv 6561  Smo wsmo 8385
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-ext 2708  ax-sep 5296  ax-nul 5306  ax-pr 5432
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-sb 2065  df-clab 2715  df-cleq 2729  df-clel 2816  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3437  df-v 3482  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-nul 4334  df-if 4526  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4908  df-br 5144  df-opab 5206  df-tr 5260  df-eprel 5584  df-po 5592  df-so 5593  df-fr 5637  df-we 5639  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ord 6387  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-fv 6569  df-smo 8386
This theorem is referenced by:  smores3  8393  alephsing  10316
  Copyright terms: Public domain W3C validator