| Step | Hyp | Ref
| Expression |
| 1 | | 6olt9o 35874 |
. . . . 5
⊢
6o ∈ 9o |
| 2 | | df-6o 35858 |
. . . . 5
⊢
6o = suc 5o |
| 3 | 1, 2 | suceldifsn0 35788 |
. . . 4
⊢
6o ∈ (9o ∖ {∅}) |
| 4 | 3 | a1i 11 |
. . 3
⊢ (𝜑 → 6o ∈
(9o ∖ {∅})) |
| 5 | | gdlopcfv6.1 |
. . . 4
⊢ (𝜑 → 𝐴 ∈ 𝑉) |
| 6 | 5 | elexd 3477 |
. . 3
⊢ (𝜑 → 𝐴 ∈ V) |
| 7 | | gdlopcfv6.2 |
. . . 4
⊢ (𝜑 → 𝐵 ∈ 𝑊) |
| 8 | 7 | elexd 3477 |
. . 3
⊢ (𝜑 → 𝐵 ∈ V) |
| 9 | | fvexd 6920 |
. . 3
⊢ (𝜑 →
(ℱ6‘〈𝐴, 𝐵〉) ∈ V) |
| 10 | | 3on 8518 |
. . . . . 6
⊢
3o ∈ On |
| 11 | | 6on 35863 |
. . . . . 6
⊢
6o ∈ On |
| 12 | | df-4o 8504 |
. . . . . . . 8
⊢
4o = suc 3o |
| 13 | 10, 12 | eqsucidi 35787 |
. . . . . . 7
⊢
3o ∈ 4o |
| 14 | | 4on 8519 |
. . . . . . . . 9
⊢
4o ∈ On |
| 15 | | df-5o 35857 |
. . . . . . . . 9
⊢
5o = suc 4o |
| 16 | 14, 15 | eqsucidi 35787 |
. . . . . . . 8
⊢
4o ∈ 5o |
| 17 | | 5on 35862 |
. . . . . . . . 9
⊢
5o ∈ On |
| 18 | 17, 2 | eqsucidi 35787 |
. . . . . . . 8
⊢
5o ∈ 6o |
| 19 | 11, 16, 18 | ontr1i 35786 |
. . . . . . 7
⊢
4o ∈ 6o |
| 20 | 11, 13, 19 | ontr1i 35786 |
. . . . . 6
⊢
3o ∈ 6o |
| 21 | 10, 11, 20 | gdlopcfvlem 35970 |
. . . . 5
⊢ ((𝜑 ∧ 6o = 𝑛) → if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))))) = if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))))) |
| 22 | | 2on 8515 |
. . . . . 6
⊢
2o ∈ On |
| 23 | | df-3o 8503 |
. . . . . . . 8
⊢
3o = suc 2o |
| 24 | 22, 23 | eqsucidi 35787 |
. . . . . . 7
⊢
2o ∈ 3o |
| 25 | 11, 24, 20 | ontr1i 35786 |
. . . . . 6
⊢
2o ∈ 6o |
| 26 | 22, 11, 25 | gdlopcfvlem 35970 |
. . . . 5
⊢ ((𝜑 ∧ 6o = 𝑛) → if(𝑛 = 2o,
(ℱ2‘〈𝑥, 𝑦〉), if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉))))))) = if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉))))))) |
| 27 | 14, 11, 19 | gdlopcfvlem 35970 |
. . . . . 6
⊢ ((𝜑 ∧ 6o = 𝑛) → if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉))))) = if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉))))) |
| 28 | 17, 11, 18 | gdlopcfvlem 35970 |
. . . . . 6
⊢ ((𝜑 ∧ 6o = 𝑛) → if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))) = if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))) |
| 29 | | eqcom 2770 |
. . . . . . . 8
⊢
(6o = 𝑛
↔ 𝑛 =
6o) |
| 30 | 29 | bilani 510 |
. . . . . . 7
⊢ ((𝜑 ∧ 6o = 𝑛) → 𝑛 = 6o) |
| 31 | 30 | iftrued 4493 |
. . . . . 6
⊢ ((𝜑 ∧ 6o = 𝑛) → if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉))) =
(ℱ6‘〈𝑥, 𝑦〉)) |
| 32 | 27, 28, 31 | 3eqtrrd 2803 |
. . . . 5
⊢ ((𝜑 ∧ 6o = 𝑛) →
(ℱ6‘〈𝑥, 𝑦〉) = if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))))) |
| 33 | 21, 26, 32 | 3eqtr4rd 2809 |
. . . 4
⊢ ((𝜑 ∧ 6o = 𝑛) →
(ℱ6‘〈𝑥, 𝑦〉) = if(𝑛 = 2o,
(ℱ2‘〈𝑥, 𝑦〉), if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))))))) |
| 34 | | 1on 8514 |
. . . . 5
⊢
1o ∈ On |
| 35 | | df-2o 8502 |
. . . . . . 7
⊢
2o = suc 1o |
| 36 | 34, 35 | eqsucidi 35787 |
. . . . . 6
⊢
1o ∈ 2o |
| 37 | 11, 36, 25 | ontr1i 35786 |
. . . . 5
⊢
1o ∈ 6o |
| 38 | 34, 11, 37 | gdlopcfvlem 35970 |
. . . 4
⊢ ((𝜑 ∧ 6o = 𝑛) → if(𝑛 = 1o,
(ℱ1‘〈𝑥, 𝑦〉), if(𝑛 = 2o,
(ℱ2‘〈𝑥, 𝑦〉), if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))))))) = if(𝑛 = 2o,
(ℱ2‘〈𝑥, 𝑦〉), if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉)))))))) |
| 39 | 33, 38 | eqtr4d 2801 |
. . 3
⊢ ((𝜑 ∧ 6o = 𝑛) →
(ℱ6‘〈𝑥, 𝑦〉) = if(𝑛 = 1o,
(ℱ1‘〈𝑥, 𝑦〉), if(𝑛 = 2o,
(ℱ2‘〈𝑥, 𝑦〉), if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉))))))))) |
| 40 | | opeq1 4843 |
. . . . 5
⊢ (𝐴 = 𝑥 → 〈𝐴, 𝑦〉 = 〈𝑥, 𝑦〉) |
| 41 | 40 | fveq2d 6909 |
. . . 4
⊢ (𝐴 = 𝑥 →
(ℱ6‘〈𝐴, 𝑦〉) =
(ℱ6‘〈𝑥, 𝑦〉)) |
| 42 | 41 | adantl 487 |
. . 3
⊢ ((𝜑 ∧ 𝐴 = 𝑥) →
(ℱ6‘〈𝐴, 𝑦〉) =
(ℱ6‘〈𝑥, 𝑦〉)) |
| 43 | | opeq2 4844 |
. . . . 5
⊢ (𝐵 = 𝑦 → 〈𝐴, 𝐵〉 = 〈𝐴, 𝑦〉) |
| 44 | 43 | fveq2d 6909 |
. . . 4
⊢ (𝐵 = 𝑦 →
(ℱ6‘〈𝐴, 𝐵〉) =
(ℱ6‘〈𝐴, 𝑦〉)) |
| 45 | 44 | adantl 487 |
. . 3
⊢ ((𝜑 ∧ 𝐵 = 𝑦) →
(ℱ6‘〈𝐴, 𝐵〉) =
(ℱ6‘〈𝐴, 𝑦〉)) |
| 46 | | df-gdlopc 35961 |
. . 3
⊢ ℱ =
(𝑛 ∈ (9o
∖ {∅}), 𝑥
∈ V, 𝑦 ∈ V
↦ if(𝑛 =
1o, (ℱ1‘〈𝑥, 𝑦〉), if(𝑛 = 2o,
(ℱ2‘〈𝑥, 𝑦〉), if(𝑛 = 3o,
(ℱ3‘〈𝑥, 𝑦〉), if(𝑛 = 4o,
(ℱ4‘〈𝑥, 𝑦〉), if(𝑛 = 5o,
(ℱ5‘〈𝑥, 𝑦〉), if(𝑛 = 6o,
(ℱ6‘〈𝑥, 𝑦〉), if(𝑛 = 7o,
(ℱ7‘〈𝑥, 𝑦〉),
(ℱ8‘〈𝑥, 𝑦〉))))))))) |
| 47 | 4, 6, 8, 9, 39, 42, 45, 46 | mpt3fvot2d 7711 |
. 2
⊢ (𝜑 → (ℱ
‘〈6o, 𝐴, 𝐵〉) =
(ℱ6‘〈𝐴, 𝐵〉)) |
| 48 | 5, 7 | gdlop6fv 35967 |
. 2
⊢ (𝜑 →
(ℱ6‘〈𝐴, 𝐵〉) = (𝐴 ∩ ◡𝐵)) |
| 49 | 47, 48 | eqtrd 2798 |
1
⊢ (𝜑 → (ℱ
‘〈6o, 𝐴, 𝐵〉) = (𝐴 ∩ ◡𝐵)) |