Users' Mathboxes Mathbox for Richard Penner < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  oaabsb Structured version   Visualization version   GIF version

Theorem oaabsb 43532
Description: The right addend absorbs the sum with an ordinal iff that ordinal times omega is less than or equal to the right addend. (Contributed by RP, 19-Feb-2025.)
Assertion
Ref Expression
oaabsb ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 ·o ω) ⊆ 𝐵 ↔ (𝐴 +o 𝐵) = 𝐵))

Proof of Theorem oaabsb
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 omelon 9555 . . . . 5 ω ∈ On
2 omcl 8463 . . . . 5 ((𝐴 ∈ On ∧ ω ∈ On) → (𝐴 ·o ω) ∈ On)
31, 2mpan2 691 . . . 4 (𝐴 ∈ On → (𝐴 ·o ω) ∈ On)
4 oawordex 8484 . . . 4 (((𝐴 ·o ω) ∈ On ∧ 𝐵 ∈ On) → ((𝐴 ·o ω) ⊆ 𝐵 ↔ ∃𝑥 ∈ On ((𝐴 ·o ω) +o 𝑥) = 𝐵))
53, 4sylan 580 . . 3 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 ·o ω) ⊆ 𝐵 ↔ ∃𝑥 ∈ On ((𝐴 ·o ω) +o 𝑥) = 𝐵))
6 simpl 482 . . . . . . . 8 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐴 ∈ On)
76adantr 480 . . . . . . 7 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑥 ∈ On) → 𝐴 ∈ On)
83ad2antrr 726 . . . . . . 7 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑥 ∈ On) → (𝐴 ·o ω) ∈ On)
9 simpr 484 . . . . . . 7 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑥 ∈ On) → 𝑥 ∈ On)
10 oaass 8488 . . . . . . 7 ((𝐴 ∈ On ∧ (𝐴 ·o ω) ∈ On ∧ 𝑥 ∈ On) → ((𝐴 +o (𝐴 ·o ω)) +o 𝑥) = (𝐴 +o ((𝐴 ·o ω) +o 𝑥)))
117, 8, 9, 10syl3anc 1373 . . . . . 6 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑥 ∈ On) → ((𝐴 +o (𝐴 ·o ω)) +o 𝑥) = (𝐴 +o ((𝐴 ·o ω) +o 𝑥)))
12 1on 8409 . . . . . . . . . 10 1o ∈ On
13 odi 8506 . . . . . . . . . 10 ((𝐴 ∈ On ∧ 1o ∈ On ∧ ω ∈ On) → (𝐴 ·o (1o +o ω)) = ((𝐴 ·o 1o) +o (𝐴 ·o ω)))
1412, 1, 13mp3an23 1455 . . . . . . . . 9 (𝐴 ∈ On → (𝐴 ·o (1o +o ω)) = ((𝐴 ·o 1o) +o (𝐴 ·o ω)))
15 1oaomeqom 43531 . . . . . . . . . . 11 (1o +o ω) = ω
1615oveq2i 7369 . . . . . . . . . 10 (𝐴 ·o (1o +o ω)) = (𝐴 ·o ω)
1716a1i 11 . . . . . . . . 9 (𝐴 ∈ On → (𝐴 ·o (1o +o ω)) = (𝐴 ·o ω))
18 om1 8469 . . . . . . . . . 10 (𝐴 ∈ On → (𝐴 ·o 1o) = 𝐴)
1918oveq1d 7373 . . . . . . . . 9 (𝐴 ∈ On → ((𝐴 ·o 1o) +o (𝐴 ·o ω)) = (𝐴 +o (𝐴 ·o ω)))
2014, 17, 193eqtr3rd 2780 . . . . . . . 8 (𝐴 ∈ On → (𝐴 +o (𝐴 ·o ω)) = (𝐴 ·o ω))
2120oveq1d 7373 . . . . . . 7 (𝐴 ∈ On → ((𝐴 +o (𝐴 ·o ω)) +o 𝑥) = ((𝐴 ·o ω) +o 𝑥))
2221ad2antrr 726 . . . . . 6 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑥 ∈ On) → ((𝐴 +o (𝐴 ·o ω)) +o 𝑥) = ((𝐴 ·o ω) +o 𝑥))
2311, 22eqtr3d 2773 . . . . 5 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑥 ∈ On) → (𝐴 +o ((𝐴 ·o ω) +o 𝑥)) = ((𝐴 ·o ω) +o 𝑥))
24 oveq2 7366 . . . . . 6 (((𝐴 ·o ω) +o 𝑥) = 𝐵 → (𝐴 +o ((𝐴 ·o ω) +o 𝑥)) = (𝐴 +o 𝐵))
25 id 22 . . . . . 6 (((𝐴 ·o ω) +o 𝑥) = 𝐵 → ((𝐴 ·o ω) +o 𝑥) = 𝐵)
2624, 25eqeq12d 2752 . . . . 5 (((𝐴 ·o ω) +o 𝑥) = 𝐵 → ((𝐴 +o ((𝐴 ·o ω) +o 𝑥)) = ((𝐴 ·o ω) +o 𝑥) ↔ (𝐴 +o 𝐵) = 𝐵))
2723, 26syl5ibcom 245 . . . 4 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑥 ∈ On) → (((𝐴 ·o ω) +o 𝑥) = 𝐵 → (𝐴 +o 𝐵) = 𝐵))
2827rexlimdva 3137 . . 3 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (∃𝑥 ∈ On ((𝐴 ·o ω) +o 𝑥) = 𝐵 → (𝐴 +o 𝐵) = 𝐵))
295, 28sylbid 240 . 2 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 ·o ω) ⊆ 𝐵 → (𝐴 +o 𝐵) = 𝐵))
30 limom 7824 . . . . . 6 Lim ω
31 omlim 8460 . . . . . 6 ((𝐴 ∈ On ∧ (ω ∈ On ∧ Lim ω)) → (𝐴 ·o ω) = 𝑥 ∈ ω (𝐴 ·o 𝑥))
321, 30, 31mpanr12 705 . . . . 5 (𝐴 ∈ On → (𝐴 ·o ω) = 𝑥 ∈ ω (𝐴 ·o 𝑥))
3332ad2antrr 726 . . . 4 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → (𝐴 ·o ω) = 𝑥 ∈ ω (𝐴 ·o 𝑥))
34 oveq2 7366 . . . . . . . . 9 (𝑥 = ∅ → (𝐴 ·o 𝑥) = (𝐴 ·o ∅))
3534sseq1d 3965 . . . . . . . 8 (𝑥 = ∅ → ((𝐴 ·o 𝑥) ⊆ 𝐵 ↔ (𝐴 ·o ∅) ⊆ 𝐵))
36 oveq2 7366 . . . . . . . . 9 (𝑥 = 𝑦 → (𝐴 ·o 𝑥) = (𝐴 ·o 𝑦))
3736sseq1d 3965 . . . . . . . 8 (𝑥 = 𝑦 → ((𝐴 ·o 𝑥) ⊆ 𝐵 ↔ (𝐴 ·o 𝑦) ⊆ 𝐵))
38 oveq2 7366 . . . . . . . . 9 (𝑥 = suc 𝑦 → (𝐴 ·o 𝑥) = (𝐴 ·o suc 𝑦))
3938sseq1d 3965 . . . . . . . 8 (𝑥 = suc 𝑦 → ((𝐴 ·o 𝑥) ⊆ 𝐵 ↔ (𝐴 ·o suc 𝑦) ⊆ 𝐵))
40 om0 8444 . . . . . . . . . 10 (𝐴 ∈ On → (𝐴 ·o ∅) = ∅)
41 0ss 4352 . . . . . . . . . 10 ∅ ⊆ 𝐵
4240, 41eqsstrdi 3978 . . . . . . . . 9 (𝐴 ∈ On → (𝐴 ·o ∅) ⊆ 𝐵)
4342ad2antrr 726 . . . . . . . 8 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → (𝐴 ·o ∅) ⊆ 𝐵)
44 nnon 7814 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ ω → 𝑦 ∈ On)
45 omcl 8463 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ On ∧ 𝑦 ∈ On) → (𝐴 ·o 𝑦) ∈ On)
466, 44, 45syl2an 596 . . . . . . . . . . . . . . . 16 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑦 ∈ ω) → (𝐴 ·o 𝑦) ∈ On)
47 simpr 484 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐵 ∈ On)
4847adantr 480 . . . . . . . . . . . . . . . 16 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑦 ∈ ω) → 𝐵 ∈ On)
496adantr 480 . . . . . . . . . . . . . . . 16 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑦 ∈ ω) → 𝐴 ∈ On)
5046, 48, 493jca 1128 . . . . . . . . . . . . . . 15 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ 𝑦 ∈ ω) → ((𝐴 ·o 𝑦) ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On))
5150expcom 413 . . . . . . . . . . . . . 14 (𝑦 ∈ ω → ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 ·o 𝑦) ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On)))
5251adantrd 491 . . . . . . . . . . . . 13 (𝑦 ∈ ω → (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → ((𝐴 ·o 𝑦) ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On)))
5352imp 406 . . . . . . . . . . . 12 ((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) → ((𝐴 ·o 𝑦) ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On))
54 oaword 8476 . . . . . . . . . . . 12 (((𝐴 ·o 𝑦) ∈ On ∧ 𝐵 ∈ On ∧ 𝐴 ∈ On) → ((𝐴 ·o 𝑦) ⊆ 𝐵 ↔ (𝐴 +o (𝐴 ·o 𝑦)) ⊆ (𝐴 +o 𝐵)))
5553, 54syl 17 . . . . . . . . . . 11 ((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) → ((𝐴 ·o 𝑦) ⊆ 𝐵 ↔ (𝐴 +o (𝐴 ·o 𝑦)) ⊆ (𝐴 +o 𝐵)))
5655biimpa 476 . . . . . . . . . 10 (((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) ∧ (𝐴 ·o 𝑦) ⊆ 𝐵) → (𝐴 +o (𝐴 ·o 𝑦)) ⊆ (𝐴 +o 𝐵))
57 simpl 482 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → 𝐴 ∈ On)
5812a1i 11 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → 1o ∈ On)
5944adantl 481 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → 𝑦 ∈ On)
60 odi 8506 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ On ∧ 1o ∈ On ∧ 𝑦 ∈ On) → (𝐴 ·o (1o +o 𝑦)) = ((𝐴 ·o 1o) +o (𝐴 ·o 𝑦)))
6157, 58, 59, 60syl3anc 1373 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → (𝐴 ·o (1o +o 𝑦)) = ((𝐴 ·o 1o) +o (𝐴 ·o 𝑦)))
62 1onn 8568 . . . . . . . . . . . . . . . . . . . 20 1o ∈ ω
63 nnacom 8545 . . . . . . . . . . . . . . . . . . . 20 ((1o ∈ ω ∧ 𝑦 ∈ ω) → (1o +o 𝑦) = (𝑦 +o 1o))
6462, 63mpan 690 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ ω → (1o +o 𝑦) = (𝑦 +o 1o))
65 oa1suc 8458 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∈ On → (𝑦 +o 1o) = suc 𝑦)
6644, 65syl 17 . . . . . . . . . . . . . . . . . . 19 (𝑦 ∈ ω → (𝑦 +o 1o) = suc 𝑦)
6764, 66eqtrd 2771 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ω → (1o +o 𝑦) = suc 𝑦)
6867oveq2d 7374 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ ω → (𝐴 ·o (1o +o 𝑦)) = (𝐴 ·o suc 𝑦))
6968adantl 481 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → (𝐴 ·o (1o +o 𝑦)) = (𝐴 ·o suc 𝑦))
7018oveq1d 7373 . . . . . . . . . . . . . . . . 17 (𝐴 ∈ On → ((𝐴 ·o 1o) +o (𝐴 ·o 𝑦)) = (𝐴 +o (𝐴 ·o 𝑦)))
7170adantr 480 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → ((𝐴 ·o 1o) +o (𝐴 ·o 𝑦)) = (𝐴 +o (𝐴 ·o 𝑦)))
7261, 69, 713eqtr3rd 2780 . . . . . . . . . . . . . . 15 ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → (𝐴 +o (𝐴 ·o 𝑦)) = (𝐴 ·o suc 𝑦))
7372expcom 413 . . . . . . . . . . . . . 14 (𝑦 ∈ ω → (𝐴 ∈ On → (𝐴 +o (𝐴 ·o 𝑦)) = (𝐴 ·o suc 𝑦)))
7473adantrd 491 . . . . . . . . . . . . 13 (𝑦 ∈ ω → ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 +o (𝐴 ·o 𝑦)) = (𝐴 ·o suc 𝑦)))
7574adantrd 491 . . . . . . . . . . . 12 (𝑦 ∈ ω → (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → (𝐴 +o (𝐴 ·o 𝑦)) = (𝐴 ·o suc 𝑦)))
7675imp 406 . . . . . . . . . . 11 ((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) → (𝐴 +o (𝐴 ·o 𝑦)) = (𝐴 ·o suc 𝑦))
7776adantr 480 . . . . . . . . . 10 (((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) ∧ (𝐴 ·o 𝑦) ⊆ 𝐵) → (𝐴 +o (𝐴 ·o 𝑦)) = (𝐴 ·o suc 𝑦))
78 simpr 484 . . . . . . . . . . . 12 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → (𝐴 +o 𝐵) = 𝐵)
7978adantl 481 . . . . . . . . . . 11 ((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) → (𝐴 +o 𝐵) = 𝐵)
8079adantr 480 . . . . . . . . . 10 (((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) ∧ (𝐴 ·o 𝑦) ⊆ 𝐵) → (𝐴 +o 𝐵) = 𝐵)
8156, 77, 803sstr3d 3988 . . . . . . . . 9 (((𝑦 ∈ ω ∧ ((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵)) ∧ (𝐴 ·o 𝑦) ⊆ 𝐵) → (𝐴 ·o suc 𝑦) ⊆ 𝐵)
8281exp31 419 . . . . . . . 8 (𝑦 ∈ ω → (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → ((𝐴 ·o 𝑦) ⊆ 𝐵 → (𝐴 ·o suc 𝑦) ⊆ 𝐵)))
8335, 37, 39, 43, 82finds2 7840 . . . . . . 7 (𝑥 ∈ ω → (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → (𝐴 ·o 𝑥) ⊆ 𝐵))
8483com12 32 . . . . . 6 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → (𝑥 ∈ ω → (𝐴 ·o 𝑥) ⊆ 𝐵))
8584ralrimiv 3127 . . . . 5 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → ∀𝑥 ∈ ω (𝐴 ·o 𝑥) ⊆ 𝐵)
86 iunss 5000 . . . . 5 ( 𝑥 ∈ ω (𝐴 ·o 𝑥) ⊆ 𝐵 ↔ ∀𝑥 ∈ ω (𝐴 ·o 𝑥) ⊆ 𝐵)
8785, 86sylibr 234 . . . 4 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → 𝑥 ∈ ω (𝐴 ·o 𝑥) ⊆ 𝐵)
8833, 87eqsstrd 3968 . . 3 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝐴 +o 𝐵) = 𝐵) → (𝐴 ·o ω) ⊆ 𝐵)
8988ex 412 . 2 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 +o 𝐵) = 𝐵 → (𝐴 ·o ω) ⊆ 𝐵))
9029, 89impbid 212 1 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 ·o ω) ⊆ 𝐵 ↔ (𝐴 +o 𝐵) = 𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1541  wcel 2113  wral 3051  wrex 3060  wss 3901  c0 4285   ciun 4946  Oncon0 6317  Lim wlim 6318  suc csuc 6319  (class class class)co 7358  ωcom 7808  1oc1o 8390   +o coa 8394   ·o comu 8395
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-rep 5224  ax-sep 5241  ax-nul 5251  ax-pr 5377  ax-un 7680  ax-inf2 9550
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-rmo 3350  df-reu 3351  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-op 4587  df-uni 4864  df-int 4903  df-iun 4948  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7809  df-2nd 7934  df-frecs 8223  df-wrecs 8254  df-recs 8303  df-rdg 8341  df-1o 8397  df-oadd 8401  df-omul 8402
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator