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

Theorem ackbij1lem16 9991
Description: Lemma for ackbij1 9994. (Contributed by Stefan O'Rear, 18-Nov-2014.)
Hypothesis
Ref Expression
ackbij.f 𝐹 = (𝑥 ∈ (𝒫 ω ∩ Fin) ↦ (card‘ 𝑦𝑥 ({𝑦} × 𝒫 𝑦)))
Assertion
Ref Expression
ackbij1lem16 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹𝐴) = (𝐹𝐵) → 𝐴 = 𝐵))
Distinct variable groups:   𝑥,𝐹,𝑦   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦

Proof of Theorem ackbij1lem16
Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 inss1 4162 . . . . . . . . 9 (𝒫 ω ∩ Fin) ⊆ 𝒫 ω
21sseli 3917 . . . . . . . 8 (𝐴 ∈ (𝒫 ω ∩ Fin) → 𝐴 ∈ 𝒫 ω)
32elpwid 4544 . . . . . . 7 (𝐴 ∈ (𝒫 ω ∩ Fin) → 𝐴 ⊆ ω)
43adantr 481 . . . . . 6 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → 𝐴 ⊆ ω)
51sseli 3917 . . . . . . . 8 (𝐵 ∈ (𝒫 ω ∩ Fin) → 𝐵 ∈ 𝒫 ω)
65elpwid 4544 . . . . . . 7 (𝐵 ∈ (𝒫 ω ∩ Fin) → 𝐵 ⊆ ω)
76adantl 482 . . . . . 6 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → 𝐵 ⊆ ω)
84, 7unssd 4120 . . . . 5 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐴𝐵) ⊆ ω)
9 inss2 4163 . . . . . . 7 (𝒫 ω ∩ Fin) ⊆ Fin
109sseli 3917 . . . . . 6 (𝐴 ∈ (𝒫 ω ∩ Fin) → 𝐴 ∈ Fin)
119sseli 3917 . . . . . 6 (𝐵 ∈ (𝒫 ω ∩ Fin) → 𝐵 ∈ Fin)
12 unfi 8955 . . . . . 6 ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → (𝐴𝐵) ∈ Fin)
1310, 11, 12syl2an 596 . . . . 5 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐴𝐵) ∈ Fin)
14 nnunifi 9065 . . . . 5 (((𝐴𝐵) ⊆ ω ∧ (𝐴𝐵) ∈ Fin) → (𝐴𝐵) ∈ ω)
158, 13, 14syl2anc 584 . . . 4 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐴𝐵) ∈ ω)
16 peano2 7737 . . . 4 ( (𝐴𝐵) ∈ ω → suc (𝐴𝐵) ∈ ω)
1715, 16syl 17 . . 3 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → suc (𝐴𝐵) ∈ ω)
18 ineq2 4140 . . . . . . . 8 (𝑎 = ∅ → (𝐴𝑎) = (𝐴 ∩ ∅))
1918fveq2d 6778 . . . . . . 7 (𝑎 = ∅ → (𝐹‘(𝐴𝑎)) = (𝐹‘(𝐴 ∩ ∅)))
20 ineq2 4140 . . . . . . . 8 (𝑎 = ∅ → (𝐵𝑎) = (𝐵 ∩ ∅))
2120fveq2d 6778 . . . . . . 7 (𝑎 = ∅ → (𝐹‘(𝐵𝑎)) = (𝐹‘(𝐵 ∩ ∅)))
2219, 21eqeq12d 2754 . . . . . 6 (𝑎 = ∅ → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) ↔ (𝐹‘(𝐴 ∩ ∅)) = (𝐹‘(𝐵 ∩ ∅))))
2318, 20eqeq12d 2754 . . . . . 6 (𝑎 = ∅ → ((𝐴𝑎) = (𝐵𝑎) ↔ (𝐴 ∩ ∅) = (𝐵 ∩ ∅)))
2422, 23imbi12d 345 . . . . 5 (𝑎 = ∅ → (((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎)) ↔ ((𝐹‘(𝐴 ∩ ∅)) = (𝐹‘(𝐵 ∩ ∅)) → (𝐴 ∩ ∅) = (𝐵 ∩ ∅))))
2524imbi2d 341 . . . 4 (𝑎 = ∅ → (((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎))) ↔ ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ ∅)) = (𝐹‘(𝐵 ∩ ∅)) → (𝐴 ∩ ∅) = (𝐵 ∩ ∅)))))
26 ineq2 4140 . . . . . . . 8 (𝑎 = 𝑏 → (𝐴𝑎) = (𝐴𝑏))
2726fveq2d 6778 . . . . . . 7 (𝑎 = 𝑏 → (𝐹‘(𝐴𝑎)) = (𝐹‘(𝐴𝑏)))
28 ineq2 4140 . . . . . . . 8 (𝑎 = 𝑏 → (𝐵𝑎) = (𝐵𝑏))
2928fveq2d 6778 . . . . . . 7 (𝑎 = 𝑏 → (𝐹‘(𝐵𝑎)) = (𝐹‘(𝐵𝑏)))
3027, 29eqeq12d 2754 . . . . . 6 (𝑎 = 𝑏 → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) ↔ (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
3126, 28eqeq12d 2754 . . . . . 6 (𝑎 = 𝑏 → ((𝐴𝑎) = (𝐵𝑎) ↔ (𝐴𝑏) = (𝐵𝑏)))
3230, 31imbi12d 345 . . . . 5 (𝑎 = 𝑏 → (((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎)) ↔ ((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏))))
3332imbi2d 341 . . . 4 (𝑎 = 𝑏 → (((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎))) ↔ ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)))))
34 ineq2 4140 . . . . . . . 8 (𝑎 = suc 𝑏 → (𝐴𝑎) = (𝐴 ∩ suc 𝑏))
3534fveq2d 6778 . . . . . . 7 (𝑎 = suc 𝑏 → (𝐹‘(𝐴𝑎)) = (𝐹‘(𝐴 ∩ suc 𝑏)))
36 ineq2 4140 . . . . . . . 8 (𝑎 = suc 𝑏 → (𝐵𝑎) = (𝐵 ∩ suc 𝑏))
3736fveq2d 6778 . . . . . . 7 (𝑎 = suc 𝑏 → (𝐹‘(𝐵𝑎)) = (𝐹‘(𝐵 ∩ suc 𝑏)))
3835, 37eqeq12d 2754 . . . . . 6 (𝑎 = suc 𝑏 → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) ↔ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))))
3934, 36eqeq12d 2754 . . . . . 6 (𝑎 = suc 𝑏 → ((𝐴𝑎) = (𝐵𝑎) ↔ (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
4038, 39imbi12d 345 . . . . 5 (𝑎 = suc 𝑏 → (((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎)) ↔ ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏))))
4140imbi2d 341 . . . 4 (𝑎 = suc 𝑏 → (((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎))) ↔ ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
42 ineq2 4140 . . . . . . . 8 (𝑎 = suc (𝐴𝐵) → (𝐴𝑎) = (𝐴 ∩ suc (𝐴𝐵)))
4342fveq2d 6778 . . . . . . 7 (𝑎 = suc (𝐴𝐵) → (𝐹‘(𝐴𝑎)) = (𝐹‘(𝐴 ∩ suc (𝐴𝐵))))
44 ineq2 4140 . . . . . . . 8 (𝑎 = suc (𝐴𝐵) → (𝐵𝑎) = (𝐵 ∩ suc (𝐴𝐵)))
4544fveq2d 6778 . . . . . . 7 (𝑎 = suc (𝐴𝐵) → (𝐹‘(𝐵𝑎)) = (𝐹‘(𝐵 ∩ suc (𝐴𝐵))))
4643, 45eqeq12d 2754 . . . . . 6 (𝑎 = suc (𝐴𝐵) → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) ↔ (𝐹‘(𝐴 ∩ suc (𝐴𝐵))) = (𝐹‘(𝐵 ∩ suc (𝐴𝐵)))))
4742, 44eqeq12d 2754 . . . . . 6 (𝑎 = suc (𝐴𝐵) → ((𝐴𝑎) = (𝐵𝑎) ↔ (𝐴 ∩ suc (𝐴𝐵)) = (𝐵 ∩ suc (𝐴𝐵))))
4846, 47imbi12d 345 . . . . 5 (𝑎 = suc (𝐴𝐵) → (((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎)) ↔ ((𝐹‘(𝐴 ∩ suc (𝐴𝐵))) = (𝐹‘(𝐵 ∩ suc (𝐴𝐵))) → (𝐴 ∩ suc (𝐴𝐵)) = (𝐵 ∩ suc (𝐴𝐵)))))
4948imbi2d 341 . . . 4 (𝑎 = suc (𝐴𝐵) → (((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴𝑎)) = (𝐹‘(𝐵𝑎)) → (𝐴𝑎) = (𝐵𝑎))) ↔ ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ suc (𝐴𝐵))) = (𝐹‘(𝐵 ∩ suc (𝐴𝐵))) → (𝐴 ∩ suc (𝐴𝐵)) = (𝐵 ∩ suc (𝐴𝐵))))))
50 in0 4325 . . . . . 6 (𝐴 ∩ ∅) = ∅
51 in0 4325 . . . . . 6 (𝐵 ∩ ∅) = ∅
5250, 51eqtr4i 2769 . . . . 5 (𝐴 ∩ ∅) = (𝐵 ∩ ∅)
53522a1i 12 . . . 4 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ ∅)) = (𝐹‘(𝐵 ∩ ∅)) → (𝐴 ∩ ∅) = (𝐵 ∩ ∅)))
54 simp13 1204 . . . . . . . . . . . . 13 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)))
55 3simpa 1147 . . . . . . . . . . . . . 14 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))))
56 ackbij1lem2 9977 . . . . . . . . . . . . . . . . 17 (𝑏𝐴 → (𝐴 ∩ suc 𝑏) = ({𝑏} ∪ (𝐴𝑏)))
5756fveq2d 6778 . . . . . . . . . . . . . . . 16 (𝑏𝐴 → (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘({𝑏} ∪ (𝐴𝑏))))
58573ad2ant2 1133 . . . . . . . . . . . . . . 15 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘({𝑏} ∪ (𝐴𝑏))))
59 ackbij1lem4 9979 . . . . . . . . . . . . . . . . . 18 (𝑏 ∈ ω → {𝑏} ∈ (𝒫 ω ∩ Fin))
6059adantr 481 . . . . . . . . . . . . . . . . 17 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → {𝑏} ∈ (𝒫 ω ∩ Fin))
61 simprl 768 . . . . . . . . . . . . . . . . . 18 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → 𝐴 ∈ (𝒫 ω ∩ Fin))
62 inss1 4162 . . . . . . . . . . . . . . . . . 18 (𝐴𝑏) ⊆ 𝐴
63 ackbij.f . . . . . . . . . . . . . . . . . . 19 𝐹 = (𝑥 ∈ (𝒫 ω ∩ Fin) ↦ (card‘ 𝑦𝑥 ({𝑦} × 𝒫 𝑦)))
6463ackbij1lem11 9986 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ (𝐴𝑏) ⊆ 𝐴) → (𝐴𝑏) ∈ (𝒫 ω ∩ Fin))
6561, 62, 64sylancl 586 . . . . . . . . . . . . . . . . 17 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝐴𝑏) ∈ (𝒫 ω ∩ Fin))
66 incom 4135 . . . . . . . . . . . . . . . . . 18 ({𝑏} ∩ (𝐴𝑏)) = ((𝐴𝑏) ∩ {𝑏})
67 inss2 4163 . . . . . . . . . . . . . . . . . . 19 (𝐴𝑏) ⊆ 𝑏
68 nnord 7720 . . . . . . . . . . . . . . . . . . . . 21 (𝑏 ∈ ω → Ord 𝑏)
69 orddisj 6304 . . . . . . . . . . . . . . . . . . . . 21 (Ord 𝑏 → (𝑏 ∩ {𝑏}) = ∅)
7068, 69syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝑏 ∈ ω → (𝑏 ∩ {𝑏}) = ∅)
7170adantr 481 . . . . . . . . . . . . . . . . . . 19 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝑏 ∩ {𝑏}) = ∅)
72 ssdisj 4393 . . . . . . . . . . . . . . . . . . 19 (((𝐴𝑏) ⊆ 𝑏 ∧ (𝑏 ∩ {𝑏}) = ∅) → ((𝐴𝑏) ∩ {𝑏}) = ∅)
7367, 71, 72sylancr 587 . . . . . . . . . . . . . . . . . 18 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → ((𝐴𝑏) ∩ {𝑏}) = ∅)
7466, 73eqtrid 2790 . . . . . . . . . . . . . . . . 17 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → ({𝑏} ∩ (𝐴𝑏)) = ∅)
7563ackbij1lem9 9984 . . . . . . . . . . . . . . . . 17 (({𝑏} ∈ (𝒫 ω ∩ Fin) ∧ (𝐴𝑏) ∈ (𝒫 ω ∩ Fin) ∧ ({𝑏} ∩ (𝐴𝑏)) = ∅) → (𝐹‘({𝑏} ∪ (𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))))
7660, 65, 74, 75syl3anc 1370 . . . . . . . . . . . . . . . 16 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝐹‘({𝑏} ∪ (𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))))
77763ad2ant1 1132 . . . . . . . . . . . . . . 15 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘({𝑏} ∪ (𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))))
7858, 77eqtrd 2778 . . . . . . . . . . . . . 14 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))))
7955, 78syl3an1 1162 . . . . . . . . . . . . 13 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))))
80 ackbij1lem2 9977 . . . . . . . . . . . . . . . . 17 (𝑏𝐵 → (𝐵 ∩ suc 𝑏) = ({𝑏} ∪ (𝐵𝑏)))
8180fveq2d 6778 . . . . . . . . . . . . . . . 16 (𝑏𝐵 → (𝐹‘(𝐵 ∩ suc 𝑏)) = (𝐹‘({𝑏} ∪ (𝐵𝑏))))
82813ad2ant3 1134 . . . . . . . . . . . . . . 15 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐵 ∩ suc 𝑏)) = (𝐹‘({𝑏} ∪ (𝐵𝑏))))
83 simprr 770 . . . . . . . . . . . . . . . . . 18 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → 𝐵 ∈ (𝒫 ω ∩ Fin))
84 inss1 4162 . . . . . . . . . . . . . . . . . 18 (𝐵𝑏) ⊆ 𝐵
8563ackbij1lem11 9986 . . . . . . . . . . . . . . . . . 18 ((𝐵 ∈ (𝒫 ω ∩ Fin) ∧ (𝐵𝑏) ⊆ 𝐵) → (𝐵𝑏) ∈ (𝒫 ω ∩ Fin))
8683, 84, 85sylancl 586 . . . . . . . . . . . . . . . . 17 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝐵𝑏) ∈ (𝒫 ω ∩ Fin))
87 incom 4135 . . . . . . . . . . . . . . . . . 18 ({𝑏} ∩ (𝐵𝑏)) = ((𝐵𝑏) ∩ {𝑏})
88 inss2 4163 . . . . . . . . . . . . . . . . . . 19 (𝐵𝑏) ⊆ 𝑏
89 ssdisj 4393 . . . . . . . . . . . . . . . . . . 19 (((𝐵𝑏) ⊆ 𝑏 ∧ (𝑏 ∩ {𝑏}) = ∅) → ((𝐵𝑏) ∩ {𝑏}) = ∅)
9088, 71, 89sylancr 587 . . . . . . . . . . . . . . . . . 18 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → ((𝐵𝑏) ∩ {𝑏}) = ∅)
9187, 90eqtrid 2790 . . . . . . . . . . . . . . . . 17 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → ({𝑏} ∩ (𝐵𝑏)) = ∅)
9263ackbij1lem9 9984 . . . . . . . . . . . . . . . . 17 (({𝑏} ∈ (𝒫 ω ∩ Fin) ∧ (𝐵𝑏) ∈ (𝒫 ω ∩ Fin) ∧ ({𝑏} ∩ (𝐵𝑏)) = ∅) → (𝐹‘({𝑏} ∪ (𝐵𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))))
9360, 86, 91, 92syl3anc 1370 . . . . . . . . . . . . . . . 16 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝐹‘({𝑏} ∪ (𝐵𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))))
94933ad2ant1 1132 . . . . . . . . . . . . . . 15 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘({𝑏} ∪ (𝐵𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))))
9582, 94eqtrd 2778 . . . . . . . . . . . . . 14 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐵 ∩ suc 𝑏)) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))))
9655, 95syl3an1 1162 . . . . . . . . . . . . 13 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐵 ∩ suc 𝑏)) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))))
9754, 79, 963eqtr3d 2786 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → ((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))))
9863ackbij1lem10 9985 . . . . . . . . . . . . . . . . 17 𝐹:(𝒫 ω ∩ Fin)⟶ω
9998ffvelrni 6960 . . . . . . . . . . . . . . . 16 ({𝑏} ∈ (𝒫 ω ∩ Fin) → (𝐹‘{𝑏}) ∈ ω)
10060, 99syl 17 . . . . . . . . . . . . . . 15 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝐹‘{𝑏}) ∈ ω)
10198ffvelrni 6960 . . . . . . . . . . . . . . . 16 ((𝐴𝑏) ∈ (𝒫 ω ∩ Fin) → (𝐹‘(𝐴𝑏)) ∈ ω)
10265, 101syl 17 . . . . . . . . . . . . . . 15 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝐹‘(𝐴𝑏)) ∈ ω)
10398ffvelrni 6960 . . . . . . . . . . . . . . . 16 ((𝐵𝑏) ∈ (𝒫 ω ∩ Fin) → (𝐹‘(𝐵𝑏)) ∈ ω)
10486, 103syl 17 . . . . . . . . . . . . . . 15 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (𝐹‘(𝐵𝑏)) ∈ ω)
105 nnacan 8459 . . . . . . . . . . . . . . 15 (((𝐹‘{𝑏}) ∈ ω ∧ (𝐹‘(𝐴𝑏)) ∈ ω ∧ (𝐹‘(𝐵𝑏)) ∈ ω) → (((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))) ↔ (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
106100, 102, 104, 105syl3anc 1370 . . . . . . . . . . . . . 14 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin))) → (((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))) ↔ (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
1071063adant3 1131 . . . . . . . . . . . . 13 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))) ↔ (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
1081073ad2ant1 1132 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → (((𝐹‘{𝑏}) +o (𝐹‘(𝐴𝑏))) = ((𝐹‘{𝑏}) +o (𝐹‘(𝐵𝑏))) ↔ (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
10997, 108mpbid 231 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)))
110 uneq2 4091 . . . . . . . . . . . . . . 15 ((𝐴𝑏) = (𝐵𝑏) → ({𝑏} ∪ (𝐴𝑏)) = ({𝑏} ∪ (𝐵𝑏)))
111110adantl 482 . . . . . . . . . . . . . 14 (((𝑏𝐴𝑏𝐵) ∧ (𝐴𝑏) = (𝐵𝑏)) → ({𝑏} ∪ (𝐴𝑏)) = ({𝑏} ∪ (𝐵𝑏)))
11256ad2antrr 723 . . . . . . . . . . . . . 14 (((𝑏𝐴𝑏𝐵) ∧ (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = ({𝑏} ∪ (𝐴𝑏)))
11380ad2antlr 724 . . . . . . . . . . . . . 14 (((𝑏𝐴𝑏𝐵) ∧ (𝐴𝑏) = (𝐵𝑏)) → (𝐵 ∩ suc 𝑏) = ({𝑏} ∪ (𝐵𝑏)))
114111, 112, 1133eqtr4d 2788 . . . . . . . . . . . . 13 (((𝑏𝐴𝑏𝐵) ∧ (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏))
115114ex 413 . . . . . . . . . . . 12 ((𝑏𝐴𝑏𝐵) → ((𝐴𝑏) = (𝐵𝑏) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
1161153adant1 1129 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → ((𝐴𝑏) = (𝐵𝑏) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
117109, 116embantd 59 . . . . . . . . . 10 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴𝑏𝐵) → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
1181173exp 1118 . . . . . . . . 9 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (𝑏𝐴 → (𝑏𝐵 → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
119 simp13 1204 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)))
120119eqcomd 2744 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → (𝐹‘(𝐵 ∩ suc 𝑏)) = (𝐹‘(𝐴 ∩ suc 𝑏)))
121 simp12r 1286 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → 𝐵 ∈ (𝒫 ω ∩ Fin))
122 simp12l 1285 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → 𝐴 ∈ (𝒫 ω ∩ Fin))
123 simp11 1202 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → 𝑏 ∈ ω)
124 simp3 1137 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → 𝑏𝐵)
125 simp2 1136 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → ¬ 𝑏𝐴)
12663ackbij1lem15 9990 . . . . . . . . . . . 12 (((𝐵 ∈ (𝒫 ω ∩ Fin) ∧ 𝐴 ∈ (𝒫 ω ∩ Fin)) ∧ (𝑏 ∈ ω ∧ 𝑏𝐵 ∧ ¬ 𝑏𝐴)) → ¬ (𝐹‘(𝐵 ∩ suc 𝑏)) = (𝐹‘(𝐴 ∩ suc 𝑏)))
127121, 122, 123, 124, 125, 126syl23anc 1376 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → ¬ (𝐹‘(𝐵 ∩ suc 𝑏)) = (𝐹‘(𝐴 ∩ suc 𝑏)))
128120, 127pm2.21dd 194 . . . . . . . . . 10 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴𝑏𝐵) → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
1291283exp 1118 . . . . . . . . 9 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (¬ 𝑏𝐴 → (𝑏𝐵 → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
130118, 129pm2.61d 179 . . . . . . . 8 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (𝑏𝐵 → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏))))
131 simp13 1204 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)))
132 simp12l 1285 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → 𝐴 ∈ (𝒫 ω ∩ Fin))
133 simp12r 1286 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → 𝐵 ∈ (𝒫 ω ∩ Fin))
134 simp11 1202 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → 𝑏 ∈ ω)
135 simp2 1136 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → 𝑏𝐴)
136 simp3 1137 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ¬ 𝑏𝐵)
13763ackbij1lem15 9990 . . . . . . . . . . . 12 (((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝑏 ∈ ω ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵)) → ¬ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)))
138132, 133, 134, 135, 136, 137syl23anc 1376 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ¬ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)))
139131, 138pm2.21dd 194 . . . . . . . . . 10 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
1401393exp 1118 . . . . . . . . 9 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (𝑏𝐴 → (¬ 𝑏𝐵 → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
141 simp13 1204 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)))
142 ackbij1lem1 9976 . . . . . . . . . . . . . . . . 17 𝑏𝐴 → (𝐴 ∩ suc 𝑏) = (𝐴𝑏))
143142adantr 481 . . . . . . . . . . . . . . . 16 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (𝐴 ∩ suc 𝑏) = (𝐴𝑏))
144143fveq2d 6778 . . . . . . . . . . . . . . 15 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐴𝑏)))
145 ackbij1lem1 9976 . . . . . . . . . . . . . . . . 17 𝑏𝐵 → (𝐵 ∩ suc 𝑏) = (𝐵𝑏))
146145adantl 482 . . . . . . . . . . . . . . . 16 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (𝐵 ∩ suc 𝑏) = (𝐵𝑏))
147146fveq2d 6778 . . . . . . . . . . . . . . 15 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (𝐹‘(𝐵 ∩ suc 𝑏)) = (𝐹‘(𝐵𝑏)))
148144, 147eqeq12d 2754 . . . . . . . . . . . . . 14 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) ↔ (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
149148biimpd 228 . . . . . . . . . . . . 13 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) → (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
1501493adant1 1129 . . . . . . . . . . . 12 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) → (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏))))
151141, 150mpd 15 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)))
152143, 146eqeq12d 2754 . . . . . . . . . . . . 13 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ((𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏) ↔ (𝐴𝑏) = (𝐵𝑏)))
153152biimprd 247 . . . . . . . . . . . 12 ((¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ((𝐴𝑏) = (𝐵𝑏) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
1541533adant1 1129 . . . . . . . . . . 11 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → ((𝐴𝑏) = (𝐵𝑏) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
155151, 154embantd 59 . . . . . . . . . 10 (((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) ∧ ¬ 𝑏𝐴 ∧ ¬ 𝑏𝐵) → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
1561553exp 1118 . . . . . . . . 9 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (¬ 𝑏𝐴 → (¬ 𝑏𝐵 → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
157140, 156pm2.61d 179 . . . . . . . 8 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (¬ 𝑏𝐵 → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏))))
158130, 157pm2.61d 179 . . . . . . 7 ((𝑏 ∈ ω ∧ (𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) ∧ (𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏))) → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))
1591583exp 1118 . . . . . 6 (𝑏 ∈ ω → ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
160159com34 91 . . . . 5 (𝑏 ∈ ω → ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏)) → ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
161160a2d 29 . . . 4 (𝑏 ∈ ω → (((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴𝑏)) = (𝐹‘(𝐵𝑏)) → (𝐴𝑏) = (𝐵𝑏))) → ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ suc 𝑏)) = (𝐹‘(𝐵 ∩ suc 𝑏)) → (𝐴 ∩ suc 𝑏) = (𝐵 ∩ suc 𝑏)))))
16225, 33, 41, 49, 53, 161finds 7745 . . 3 (suc (𝐴𝐵) ∈ ω → ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ suc (𝐴𝐵))) = (𝐹‘(𝐵 ∩ suc (𝐴𝐵))) → (𝐴 ∩ suc (𝐴𝐵)) = (𝐵 ∩ suc (𝐴𝐵)))))
16317, 162mpcom 38 . 2 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ suc (𝐴𝐵))) = (𝐹‘(𝐵 ∩ suc (𝐴𝐵))) → (𝐴 ∩ suc (𝐴𝐵)) = (𝐵 ∩ suc (𝐴𝐵))))
164 omsson 7716 . . . . . . . 8 ω ⊆ On
1658, 164sstrdi 3933 . . . . . . 7 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐴𝐵) ⊆ On)
166 onsucuni 7675 . . . . . . 7 ((𝐴𝐵) ⊆ On → (𝐴𝐵) ⊆ suc (𝐴𝐵))
167165, 166syl 17 . . . . . 6 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐴𝐵) ⊆ suc (𝐴𝐵))
168167unssad 4121 . . . . 5 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → 𝐴 ⊆ suc (𝐴𝐵))
169 df-ss 3904 . . . . 5 (𝐴 ⊆ suc (𝐴𝐵) ↔ (𝐴 ∩ suc (𝐴𝐵)) = 𝐴)
170168, 169sylib 217 . . . 4 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐴 ∩ suc (𝐴𝐵)) = 𝐴)
171170fveq2d 6778 . . 3 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐹‘(𝐴 ∩ suc (𝐴𝐵))) = (𝐹𝐴))
172167unssbd 4122 . . . . 5 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → 𝐵 ⊆ suc (𝐴𝐵))
173 df-ss 3904 . . . . 5 (𝐵 ⊆ suc (𝐴𝐵) ↔ (𝐵 ∩ suc (𝐴𝐵)) = 𝐵)
174172, 173sylib 217 . . . 4 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐵 ∩ suc (𝐴𝐵)) = 𝐵)
175174fveq2d 6778 . . 3 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → (𝐹‘(𝐵 ∩ suc (𝐴𝐵))) = (𝐹𝐵))
176171, 175eqeq12d 2754 . 2 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹‘(𝐴 ∩ suc (𝐴𝐵))) = (𝐹‘(𝐵 ∩ suc (𝐴𝐵))) ↔ (𝐹𝐴) = (𝐹𝐵)))
177170, 174eqeq12d 2754 . 2 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐴 ∩ suc (𝐴𝐵)) = (𝐵 ∩ suc (𝐴𝐵)) ↔ 𝐴 = 𝐵))
178163, 176, 1773imtr3d 293 1 ((𝐴 ∈ (𝒫 ω ∩ Fin) ∧ 𝐵 ∈ (𝒫 ω ∩ Fin)) → ((𝐹𝐴) = (𝐹𝐵) → 𝐴 = 𝐵))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396  w3a 1086   = wceq 1539  wcel 2106  cun 3885  cin 3886  wss 3887  c0 4256  𝒫 cpw 4533  {csn 4561   cuni 4839   ciun 4924  cmpt 5157   × cxp 5587  Ord word 6265  Oncon0 6266  suc csuc 6268  cfv 6433  (class class class)co 7275  ωcom 7712   +o coa 8294  Fincfn 8733  cardccrd 9693
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-int 4880  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-ov 7278  df-oprab 7279  df-mpo 7280  df-om 7713  df-1st 7831  df-2nd 7832  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-1o 8297  df-2o 8298  df-oadd 8301  df-er 8498  df-map 8617  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-dju 9659  df-card 9697
This theorem is referenced by:  ackbij1lem17  9992
  Copyright terms: Public domain W3C validator