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

Theorem smores 8390
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 6609 . . . . . . . 8 (Fun 𝐴 → Fun (𝐴𝐵))
2 funfn 6597 . . . . . . . 8 (Fun 𝐴𝐴 Fn dom 𝐴)
3 funfn 6597 . . . . . . . 8 (Fun (𝐴𝐵) ↔ (𝐴𝐵) Fn dom (𝐴𝐵))
41, 2, 33imtr3i 291 . . . . . . 7 (𝐴 Fn dom 𝐴 → (𝐴𝐵) Fn dom (𝐴𝐵))
5 resss 6021 . . . . . . . . 9 (𝐴𝐵) ⊆ 𝐴
65rnssi 5953 . . . . . . . 8 ran (𝐴𝐵) ⊆ ran 𝐴
7 sstr 4003 . . . . . . . 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 6566 . . . . . 6 (𝐴:dom 𝐴⟶On ↔ (𝐴 Fn dom 𝐴 ∧ ran 𝐴 ⊆ On))
11 df-f 6566 . . . . . 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 6407 . . . . . . 7 ((Ord dom 𝐴𝐵 ∈ dom 𝐴) → Ord 𝐵)
1514expcom 413 . . . . . 6 (𝐵 ∈ dom 𝐴 → (Ord dom 𝐴 → Ord 𝐵))
16 ordin 6415 . . . . . . 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 6031 . . . . . 6 dom (𝐴𝐵) = (𝐵 ∩ dom 𝐴)
20 ordeq 6392 . . . . . 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 5915 . . . . . . . . 9 ((𝐴𝐵) ⊆ 𝐴 → dom (𝐴𝐵) ⊆ dom 𝐴)
245, 23ax-mp 5 . . . . . . . 8 dom (𝐴𝐵) ⊆ dom 𝐴
25 ssralv 4063 . . . . . . . 8 (dom (𝐴𝐵) ⊆ dom 𝐴 → (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
2624, 25ax-mp 5 . . . . . . 7 (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
27 ssralv 4063 . . . . . . . . 9 (dom (𝐴𝐵) ⊆ dom 𝐴 → (∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
2824, 27ax-mp 5 . . . . . . . 8 (∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
2928ralimi 3080 . . . . . . 7 (∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
3026, 29syl 17 . . . . . 6 (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
31 inss1 4244 . . . . . . . . . . . . 13 (𝐵 ∩ dom 𝐴) ⊆ 𝐵
3219, 31eqsstri 4029 . . . . . . . . . . . 12 dom (𝐴𝐵) ⊆ 𝐵
33 simpl 482 . . . . . . . . . . . 12 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑥 ∈ dom (𝐴𝐵))
3432, 33sselid 3992 . . . . . . . . . . 11 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑥𝐵)
3534fvresd 6926 . . . . . . . . . 10 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → ((𝐴𝐵)‘𝑥) = (𝐴𝑥))
36 simpr 484 . . . . . . . . . . . 12 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑦 ∈ dom (𝐴𝐵))
3732, 36sselid 3992 . . . . . . . . . . 11 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → 𝑦𝐵)
3837fvresd 6926 . . . . . . . . . 10 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → ((𝐴𝐵)‘𝑦) = (𝐴𝑦))
3935, 38eleq12d 2832 . . . . . . . . 9 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → (((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦) ↔ (𝐴𝑥) ∈ (𝐴𝑦)))
4039imbi2d 340 . . . . . . . 8 ((𝑥 ∈ dom (𝐴𝐵) ∧ 𝑦 ∈ dom (𝐴𝐵)) → ((𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)) ↔ (𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
4140ralbidva 3173 . . . . . . 7 (𝑥 ∈ dom (𝐴𝐵) → (∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)) ↔ ∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
4241ralbiia 3088 . . . . . 6 (∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)) ↔ ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)))
4330, 42sylibr 234 . . . . 5 (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)))
4443a1i 11 . . . 4 (𝐵 ∈ dom 𝐴 → (∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦)) → ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦))))
4513, 22, 443anim123d 1442 . . 3 (𝐵 ∈ dom 𝐴 → ((𝐴:dom 𝐴⟶On ∧ Ord dom 𝐴 ∧ ∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))) → ((𝐴𝐵):dom (𝐴𝐵)⟶On ∧ Ord dom (𝐴𝐵) ∧ ∀𝑥 ∈ dom (𝐴𝐵)∀𝑦 ∈ dom (𝐴𝐵)(𝑥𝑦 → ((𝐴𝐵)‘𝑥) ∈ ((𝐴𝐵)‘𝑦)))))
46 df-smo 8384 . . 3 (Smo 𝐴 ↔ (𝐴:dom 𝐴⟶On ∧ Ord dom 𝐴 ∧ ∀𝑥 ∈ dom 𝐴𝑦 ∈ dom 𝐴(𝑥𝑦 → (𝐴𝑥) ∈ (𝐴𝑦))))
47 df-smo 8384 . . 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 1086   = wceq 1536  wcel 2105  wral 3058  cin 3961  wss 3962  dom cdm 5688  ran crn 5689  cres 5690  Ord word 6384  Oncon0 6385  Fun wfun 6556   Fn wfn 6557  wf 6558  cfv 6562  Smo wsmo 8383
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1791  ax-4 1805  ax-5 1907  ax-6 1964  ax-7 2004  ax-8 2107  ax-9 2115  ax-ext 2705  ax-sep 5301  ax-nul 5311  ax-pr 5437
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1539  df-fal 1549  df-ex 1776  df-sb 2062  df-clab 2712  df-cleq 2726  df-clel 2813  df-ne 2938  df-ral 3059  df-rex 3068  df-rab 3433  df-v 3479  df-dif 3965  df-un 3967  df-in 3969  df-ss 3979  df-nul 4339  df-if 4531  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4912  df-br 5148  df-opab 5210  df-tr 5265  df-eprel 5588  df-po 5596  df-so 5597  df-fr 5640  df-we 5642  df-xp 5694  df-rel 5695  df-cnv 5696  df-co 5697  df-dm 5698  df-rn 5699  df-res 5700  df-ord 6388  df-iota 6515  df-fun 6564  df-fn 6565  df-f 6566  df-fv 6570  df-smo 8384
This theorem is referenced by:  smores3  8391  alephsing  10313
  Copyright terms: Public domain W3C validator