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

Theorem oeoelem 8607
Description: Lemma for oeoe 8608. (Contributed by Eric Schmidt, 26-May-2009.)
Hypotheses
Ref Expression
oeoelem.1 𝐴 ∈ On
oeoelem.2 ∅ ∈ 𝐴
Assertion
Ref Expression
oeoelem ((𝐵 ∈ On ∧ 𝐶 ∈ On) → ((𝐴 ↑o 𝐵) ↑o 𝐶) = (𝐴 ↑o (𝐵 ·o 𝐶)))

Proof of Theorem oeoelem
Dummy variables 𝑥 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq2 7428 . . . 4 (𝑥 = ∅ → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ((𝐴 ↑o 𝐵) ↑o ∅))
2 oveq2 7428 . . . . 5 (𝑥 = ∅ → (𝐵 ·o 𝑥) = (𝐵 ·o ∅))
32oveq2d 7436 . . . 4 (𝑥 = ∅ → (𝐴 ↑o (𝐵 ·o 𝑥)) = (𝐴 ↑o (𝐵 ·o ∅)))
41, 3eqeq12d 2777 . . 3 (𝑥 = ∅ → (((𝐴 ↑o 𝐵) ↑o 𝑥) = (𝐴 ↑o (𝐵 ·o 𝑥)) ↔ ((𝐴 ↑o 𝐵) ↑o ∅) = (𝐴 ↑o (𝐵 ·o ∅))))
5 oveq2 7428 . . . 4 (𝑥 = 𝑦 → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ((𝐴 ↑o 𝐵) ↑o 𝑦))
6 oveq2 7428 . . . . 5 (𝑥 = 𝑦 → (𝐵 ·o 𝑥) = (𝐵 ·o 𝑦))
76oveq2d 7436 . . . 4 (𝑥 = 𝑦 → (𝐴 ↑o (𝐵 ·o 𝑥)) = (𝐴 ↑o (𝐵 ·o 𝑦)))
85, 7eqeq12d 2777 . . 3 (𝑥 = 𝑦 → (((𝐴 ↑o 𝐵) ↑o 𝑥) = (𝐴 ↑o (𝐵 ·o 𝑥)) ↔ ((𝐴 ↑o 𝐵) ↑o 𝑦) = (𝐴 ↑o (𝐵 ·o 𝑦))))
9 oveq2 7428 . . . 4 (𝑥 = suc 𝑦 → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ((𝐴 ↑o 𝐵) ↑o suc 𝑦))
10 oveq2 7428 . . . . 5 (𝑥 = suc 𝑦 → (𝐵 ·o 𝑥) = (𝐵 ·o suc 𝑦))
1110oveq2d 7436 . . . 4 (𝑥 = suc 𝑦 → (𝐴 ↑o (𝐵 ·o 𝑥)) = (𝐴 ↑o (𝐵 ·o suc 𝑦)))
129, 11eqeq12d 2777 . . 3 (𝑥 = suc 𝑦 → (((𝐴 ↑o 𝐵) ↑o 𝑥) = (𝐴 ↑o (𝐵 ·o 𝑥)) ↔ ((𝐴 ↑o 𝐵) ↑o suc 𝑦) = (𝐴 ↑o (𝐵 ·o suc 𝑦))))
13 oveq2 7428 . . . 4 (𝑥 = 𝐶 → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ((𝐴 ↑o 𝐵) ↑o 𝐶))
14 oveq2 7428 . . . . 5 (𝑥 = 𝐶 → (𝐵 ·o 𝑥) = (𝐵 ·o 𝐶))
1514oveq2d 7436 . . . 4 (𝑥 = 𝐶 → (𝐴 ↑o (𝐵 ·o 𝑥)) = (𝐴 ↑o (𝐵 ·o 𝐶)))
1613, 15eqeq12d 2777 . . 3 (𝑥 = 𝐶 → (((𝐴 ↑o 𝐵) ↑o 𝑥) = (𝐴 ↑o (𝐵 ·o 𝑥)) ↔ ((𝐴 ↑o 𝐵) ↑o 𝐶) = (𝐴 ↑o (𝐵 ·o 𝐶))))
17 oeoelem.1 . . . . . 6 𝐴 ∈ On
18 oecl 8545 . . . . . 6 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ↑o 𝐵) ∈ On)
1917, 18mpan 703 . . . . 5 (𝐵 ∈ On → (𝐴 ↑o 𝐵) ∈ On)
20 oe0 8530 . . . . 5 ((𝐴 ↑o 𝐵) ∈ On → ((𝐴 ↑o 𝐵) ↑o ∅) = 1o)
2119, 20syl 18 . . . 4 (𝐵 ∈ On → ((𝐴 ↑o 𝐵) ↑o ∅) = 1o)
22 om0 8525 . . . . . 6 (𝐵 ∈ On → (𝐵 ·o ∅) = ∅)
2322oveq2d 7436 . . . . 5 (𝐵 ∈ On → (𝐴 ↑o (𝐵 ·o ∅)) = (𝐴 ↑o ∅))
24 oe0 8530 . . . . . 6 (𝐴 ∈ On → (𝐴 ↑o ∅) = 1o)
2517, 24ax-mp 5 . . . . 5 (𝐴 ↑o ∅) = 1o
2623, 25eqtrdi 2812 . . . 4 (𝐵 ∈ On → (𝐴 ↑o (𝐵 ·o ∅)) = 1o)
2721, 26eqtr4d 2799 . . 3 (𝐵 ∈ On → ((𝐴 ↑o 𝐵) ↑o ∅) = (𝐴 ↑o (𝐵 ·o ∅)))
28 oveq1 7427 . . . . 5 (((𝐴 ↑o 𝐵) ↑o 𝑦) = (𝐴 ↑o (𝐵 ·o 𝑦)) → (((𝐴 ↑o 𝐵) ↑o 𝑦) ·o (𝐴 ↑o 𝐵)) = ((𝐴 ↑o (𝐵 ·o 𝑦)) ·o (𝐴 ↑o 𝐵)))
29 oesuc 8535 . . . . . . 7 (((𝐴 ↑o 𝐵) ∈ On ∧ 𝑦 ∈ On) → ((𝐴 ↑o 𝐵) ↑o suc 𝑦) = (((𝐴 ↑o 𝐵) ↑o 𝑦) ·o (𝐴 ↑o 𝐵)))
3019, 29sylan 592 . . . . . 6 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → ((𝐴 ↑o 𝐵) ↑o suc 𝑦) = (((𝐴 ↑o 𝐵) ↑o 𝑦) ·o (𝐴 ↑o 𝐵)))
31 omsuc 8534 . . . . . . . 8 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵 ·o suc 𝑦) = ((𝐵 ·o 𝑦) +o 𝐵))
3231oveq2d 7436 . . . . . . 7 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐴 ↑o (𝐵 ·o suc 𝑦)) = (𝐴 ↑o ((𝐵 ·o 𝑦) +o 𝐵)))
33 omcl 8544 . . . . . . . . 9 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵 ·o 𝑦) ∈ On)
34 oeoa 8606 . . . . . . . . . 10 ((𝐴 ∈ On ∧ (𝐵 ·o 𝑦) ∈ On ∧ 𝐵 ∈ On) → (𝐴 ↑o ((𝐵 ·o 𝑦) +o 𝐵)) = ((𝐴 ↑o (𝐵 ·o 𝑦)) ·o (𝐴 ↑o 𝐵)))
3517, 34mp3an1 1477 . . . . . . . . 9 (((𝐵 ·o 𝑦) ∈ On ∧ 𝐵 ∈ On) → (𝐴 ↑o ((𝐵 ·o 𝑦) +o 𝐵)) = ((𝐴 ↑o (𝐵 ·o 𝑦)) ·o (𝐴 ↑o 𝐵)))
3633, 35sylan 592 . . . . . . . 8 (((𝐵 ∈ On ∧ 𝑦 ∈ On) ∧ 𝐵 ∈ On) → (𝐴 ↑o ((𝐵 ·o 𝑦) +o 𝐵)) = ((𝐴 ↑o (𝐵 ·o 𝑦)) ·o (𝐴 ↑o 𝐵)))
3736anabss1 679 . . . . . . 7 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐴 ↑o ((𝐵 ·o 𝑦) +o 𝐵)) = ((𝐴 ↑o (𝐵 ·o 𝑦)) ·o (𝐴 ↑o 𝐵)))
3832, 37eqtrd 2796 . . . . . 6 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐴 ↑o (𝐵 ·o suc 𝑦)) = ((𝐴 ↑o (𝐵 ·o 𝑦)) ·o (𝐴 ↑o 𝐵)))
3930, 38eqeq12d 2777 . . . . 5 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (((𝐴 ↑o 𝐵) ↑o suc 𝑦) = (𝐴 ↑o (𝐵 ·o suc 𝑦)) ↔ (((𝐴 ↑o 𝐵) ↑o 𝑦) ·o (𝐴 ↑o 𝐵)) = ((𝐴 ↑o (𝐵 ·o 𝑦)) ·o (𝐴 ↑o 𝐵))))
4028, 39imbitrrid 249 . . . 4 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (((𝐴 ↑o 𝐵) ↑o 𝑦) = (𝐴 ↑o (𝐵 ·o 𝑦)) → ((𝐴 ↑o 𝐵) ↑o suc 𝑦) = (𝐴 ↑o (𝐵 ·o suc 𝑦))))
4140expcom 419 . . 3 (𝑦 ∈ On → (𝐵 ∈ On → (((𝐴 ↑o 𝐵) ↑o 𝑦) = (𝐴 ↑o (𝐵 ·o 𝑦)) → ((𝐴 ↑o 𝐵) ↑o suc 𝑦) = (𝐴 ↑o (𝐵 ·o suc 𝑦)))))
42 iuneq2 4971 . . . . 5 (∀𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦) = (𝐴 ↑o (𝐵 ·o 𝑦)) → ∪ 𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o (𝐵 ·o 𝑦)))
43 vex 3455 . . . . . . 7 𝑥 ∈ V
44 oeoelem.2 . . . . . . . . . 10 ∅ ∈ 𝐴
45 oen0 8595 . . . . . . . . . 10 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ∅ ∈ 𝐴) → ∅ ∈ (𝐴 ↑o 𝐵))
4644, 45mpan2 704 . . . . . . . . 9 ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∅ ∈ (𝐴 ↑o 𝐵))
47 oelim 8542 . . . . . . . . . 10 ((((𝐴 ↑o 𝐵) ∈ On ∧ (𝑥 ∈ V ∧ Lim 𝑥)) ∧ ∅ ∈ (𝐴 ↑o 𝐵)) → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦))
4818, 47sylanl1 693 . . . . . . . . 9 ((((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ V ∧ Lim 𝑥)) ∧ ∅ ∈ (𝐴 ↑o 𝐵)) → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦))
4946, 48mpidan 702 . . . . . . . 8 (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ (𝑥 ∈ V ∧ Lim 𝑥)) → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦))
5017, 49mpanl1 713 . . . . . . 7 ((𝐵 ∈ On ∧ (𝑥 ∈ V ∧ Lim 𝑥)) → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦))
5143, 50mpanr1 716 . . . . . 6 ((𝐵 ∈ On ∧ Lim 𝑥) → ((𝐴 ↑o 𝐵) ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦))
52 omlim 8541 . . . . . . . . 9 ((𝐵 ∈ On ∧ (𝑥 ∈ V ∧ Lim 𝑥)) → (𝐵 ·o 𝑥) = ∪ 𝑦 ∈ 𝑥 (𝐵 ·o 𝑦))
5343, 52mpanr1 716 . . . . . . . 8 ((𝐵 ∈ On ∧ Lim 𝑥) → (𝐵 ·o 𝑥) = ∪ 𝑦 ∈ 𝑥 (𝐵 ·o 𝑦))
5453oveq2d 7436 . . . . . . 7 ((𝐵 ∈ On ∧ Lim 𝑥) → (𝐴 ↑o (𝐵 ·o 𝑥)) = (𝐴 ↑o ∪ 𝑦 ∈ 𝑥 (𝐵 ·o 𝑦)))
55 limord 6424 . . . . . . . . . . . 12 (Lim 𝑥 → Ord 𝑥)
56 ordelon 6386 . . . . . . . . . . . 12 ((Ord 𝑥 ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ On)
5755, 56sylan 592 . . . . . . . . . . 11 ((Lim 𝑥 ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ On)
5857, 33sylan2 605 . . . . . . . . . 10 ((𝐵 ∈ On ∧ (Lim 𝑥 ∧ 𝑦 ∈ 𝑥)) → (𝐵 ·o 𝑦) ∈ On)
5958anassrs 473 . . . . . . . . 9 (((𝐵 ∈ On ∧ Lim 𝑥) ∧ 𝑦 ∈ 𝑥) → (𝐵 ·o 𝑦) ∈ On)
6059ralrimiva 3155 . . . . . . . 8 ((𝐵 ∈ On ∧ Lim 𝑥) → ∀𝑦 ∈ 𝑥 (𝐵 ·o 𝑦) ∈ On)
61 0ellim 6427 . . . . . . . . . 10 (Lim 𝑥 → ∅ ∈ 𝑥)
6261ne0d 4288 . . . . . . . . 9 (Lim 𝑥 → 𝑥 ≠ ∅)
6362adantl 487 . . . . . . . 8 ((𝐵 ∈ On ∧ Lim 𝑥) → 𝑥 ≠ ∅)
64 vex 3455 . . . . . . . . . 10 𝑤 ∈ V
65 oelim 8542 . . . . . . . . . . . 12 (((𝐴 ∈ On ∧ (𝑤 ∈ V ∧ Lim 𝑤)) ∧ ∅ ∈ 𝐴) → (𝐴 ↑o 𝑤) = ∪ 𝑧 ∈ 𝑤 (𝐴 ↑o 𝑧))
6644, 65mpan2 704 . . . . . . . . . . 11 ((𝐴 ∈ On ∧ (𝑤 ∈ V ∧ Lim 𝑤)) → (𝐴 ↑o 𝑤) = ∪ 𝑧 ∈ 𝑤 (𝐴 ↑o 𝑧))
6717, 66mpan 703 . . . . . . . . . 10 ((𝑤 ∈ V ∧ Lim 𝑤) → (𝐴 ↑o 𝑤) = ∪ 𝑧 ∈ 𝑤 (𝐴 ↑o 𝑧))
6864, 67mpan 703 . . . . . . . . 9 (Lim 𝑤 → (𝐴 ↑o 𝑤) = ∪ 𝑧 ∈ 𝑤 (𝐴 ↑o 𝑧))
69 oewordi 8600 . . . . . . . . . . . 12 (((𝑧 ∈ On ∧ 𝑤 ∈ On ∧ 𝐴 ∈ On) ∧ ∅ ∈ 𝐴) → (𝑧 ⊆ 𝑤 → (𝐴 ↑o 𝑧) ⊆ (𝐴 ↑o 𝑤)))
7044, 69mpan2 704 . . . . . . . . . . 11 ((𝑧 ∈ On ∧ 𝑤 ∈ On ∧ 𝐴 ∈ On) → (𝑧 ⊆ 𝑤 → (𝐴 ↑o 𝑧) ⊆ (𝐴 ↑o 𝑤)))
7117, 70mp3an3 1479 . . . . . . . . . 10 ((𝑧 ∈ On ∧ 𝑤 ∈ On) → (𝑧 ⊆ 𝑤 → (𝐴 ↑o 𝑧) ⊆ (𝐴 ↑o 𝑤)))
72713impia 1135 . . . . . . . . 9 ((𝑧 ∈ On ∧ 𝑤 ∈ On ∧ 𝑧 ⊆ 𝑤) → (𝐴 ↑o 𝑧) ⊆ (𝐴 ↑o 𝑤))
7368, 72onoviun 8351 . . . . . . . 8 ((𝑥 ∈ V ∧ ∀𝑦 ∈ 𝑥 (𝐵 ·o 𝑦) ∈ On ∧ 𝑥 ≠ ∅) → (𝐴 ↑o ∪ 𝑦 ∈ 𝑥 (𝐵 ·o 𝑦)) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o (𝐵 ·o 𝑦)))
7443, 60, 63, 73mp3an2i 1495 . . . . . . 7 ((𝐵 ∈ On ∧ Lim 𝑥) → (𝐴 ↑o ∪ 𝑦 ∈ 𝑥 (𝐵 ·o 𝑦)) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o (𝐵 ·o 𝑦)))
7554, 74eqtrd 2796 . . . . . 6 ((𝐵 ∈ On ∧ Lim 𝑥) → (𝐴 ↑o (𝐵 ·o 𝑥)) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o (𝐵 ·o 𝑦)))
7651, 75eqeq12d 2777 . . . . 5 ((𝐵 ∈ On ∧ Lim 𝑥) → (((𝐴 ↑o 𝐵) ↑o 𝑥) = (𝐴 ↑o (𝐵 ·o 𝑥)) ↔ ∪ 𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o (𝐵 ·o 𝑦))))
7742, 76imbitrrid 249 . . . 4 ((𝐵 ∈ On ∧ Lim 𝑥) → (∀𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦) = (𝐴 ↑o (𝐵 ·o 𝑦)) → ((𝐴 ↑o 𝐵) ↑o 𝑥) = (𝐴 ↑o (𝐵 ·o 𝑥))))
7877expcom 419 . . 3 (Lim 𝑥 → (𝐵 ∈ On → (∀𝑦 ∈ 𝑥 ((𝐴 ↑o 𝐵) ↑o 𝑦) = (𝐴 ↑o (𝐵 ·o 𝑦)) → ((𝐴 ↑o 𝐵) ↑o 𝑥) = (𝐴 ↑o (𝐵 ·o 𝑥)))))
794, 8, 12, 16, 27, 41, 78tfinds3 7876 . 2 (𝐶 ∈ On → (𝐵 ∈ On → ((𝐴 ↑o 𝐵) ↑o 𝐶) = (𝐴 ↑o (𝐵 ·o 𝐶))))
8079impcom 413 1 ((𝐵 ∈ On ∧ 𝐶 ∈ On) → ((𝐴 ↑o 𝐵) ↑o 𝐶) = (𝐴 ↑o (𝐵 ·o 𝐶)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  Vcvv 3451   ⊆ wss 3899  ∅c0 4279  ∪ ciun 4951  Ord word 6361  Oncon0 6362  Lim wlim 6363  suc csuc 6364  (class class class)co 7420  1oc1o 8469   +o coa 8473   ·o comu 8474   ↑o coe 8475
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 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pr 5391  ax-un 7751
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 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7878  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-2o 8477  df-oadd 8480  df-omul 8481  df-oexp 8482
This theorem is used by:  oeoe  8608
  Copyright terms: Public domain W3C validator