Step | Hyp | Ref
| Expression |
1 | | elsng 4572 |
. . . . . . . . 9
⊢ (𝐴 ∈ 𝑉 → (𝐴 ∈ {𝐵} ↔ 𝐴 = 𝐵)) |
2 | | bj-xpima2sn 35075 |
. . . . . . . . 9
⊢ (𝐴 ∈ {𝐵} → (({𝐵} × tag 𝐶) “ {𝐴}) = tag 𝐶) |
3 | 1, 2 | syl6bir 253 |
. . . . . . . 8
⊢ (𝐴 ∈ 𝑉 → (𝐴 = 𝐵 → (({𝐵} × tag 𝐶) “ {𝐴}) = tag 𝐶)) |
4 | 3 | imp 406 |
. . . . . . 7
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐴 = 𝐵) → (({𝐵} × tag 𝐶) “ {𝐴}) = tag 𝐶) |
5 | 4 | eleq2d 2824 |
. . . . . 6
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐴 = 𝐵) → ({𝑥} ∈ (({𝐵} × tag 𝐶) “ {𝐴}) ↔ {𝑥} ∈ tag 𝐶)) |
6 | 5 | abbidv 2808 |
. . . . 5
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐴 = 𝐵) → {𝑥 ∣ {𝑥} ∈ (({𝐵} × tag 𝐶) “ {𝐴})} = {𝑥 ∣ {𝑥} ∈ tag 𝐶}) |
7 | | df-bj-proj 35108 |
. . . . 5
⊢ (𝐴 Proj ({𝐵} × tag 𝐶)) = {𝑥 ∣ {𝑥} ∈ (({𝐵} × tag 𝐶) “ {𝐴})} |
8 | | bj-taginv 35103 |
. . . . 5
⊢ 𝐶 = {𝑥 ∣ {𝑥} ∈ tag 𝐶} |
9 | 6, 7, 8 | 3eqtr4g 2804 |
. . . 4
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐴 = 𝐵) → (𝐴 Proj ({𝐵} × tag 𝐶)) = 𝐶) |
10 | 9 | ex 412 |
. . 3
⊢ (𝐴 ∈ 𝑉 → (𝐴 = 𝐵 → (𝐴 Proj ({𝐵} × tag 𝐶)) = 𝐶)) |
11 | | noel 4261 |
. . . . 5
⊢ ¬
{𝑥} ∈
∅ |
12 | 7 | abeq2i 2874 |
. . . . . 6
⊢ (𝑥 ∈ (𝐴 Proj ({𝐵} × tag 𝐶)) ↔ {𝑥} ∈ (({𝐵} × tag 𝐶) “ {𝐴})) |
13 | | elsni 4575 |
. . . . . . . 8
⊢ (𝐴 ∈ {𝐵} → 𝐴 = 𝐵) |
14 | | bj-xpima1sn 35073 |
. . . . . . . 8
⊢ (¬
𝐴 ∈ {𝐵} → (({𝐵} × tag 𝐶) “ {𝐴}) = ∅) |
15 | 13, 14 | nsyl5 159 |
. . . . . . 7
⊢ (¬
𝐴 = 𝐵 → (({𝐵} × tag 𝐶) “ {𝐴}) = ∅) |
16 | 15 | eleq2d 2824 |
. . . . . 6
⊢ (¬
𝐴 = 𝐵 → ({𝑥} ∈ (({𝐵} × tag 𝐶) “ {𝐴}) ↔ {𝑥} ∈ ∅)) |
17 | 12, 16 | syl5bb 282 |
. . . . 5
⊢ (¬
𝐴 = 𝐵 → (𝑥 ∈ (𝐴 Proj ({𝐵} × tag 𝐶)) ↔ {𝑥} ∈ ∅)) |
18 | 11, 17 | mtbiri 326 |
. . . 4
⊢ (¬
𝐴 = 𝐵 → ¬ 𝑥 ∈ (𝐴 Proj ({𝐵} × tag 𝐶))) |
19 | 18 | eq0rdv 4335 |
. . 3
⊢ (¬
𝐴 = 𝐵 → (𝐴 Proj ({𝐵} × tag 𝐶)) = ∅) |
20 | | ifval 4498 |
. . 3
⊢ ((𝐴 Proj ({𝐵} × tag 𝐶)) = if(𝐴 = 𝐵, 𝐶, ∅) ↔ ((𝐴 = 𝐵 → (𝐴 Proj ({𝐵} × tag 𝐶)) = 𝐶) ∧ (¬ 𝐴 = 𝐵 → (𝐴 Proj ({𝐵} × tag 𝐶)) = ∅))) |
21 | 10, 19, 20 | sylanblrc 589 |
. 2
⊢ (𝐴 ∈ 𝑉 → (𝐴 Proj ({𝐵} × tag 𝐶)) = if(𝐴 = 𝐵, 𝐶, ∅)) |
22 | | eqcom 2745 |
. . 3
⊢ (𝐴 = 𝐵 ↔ 𝐵 = 𝐴) |
23 | | ifbi 4478 |
. . 3
⊢ ((𝐴 = 𝐵 ↔ 𝐵 = 𝐴) → if(𝐴 = 𝐵, 𝐶, ∅) = if(𝐵 = 𝐴, 𝐶, ∅)) |
24 | 22, 23 | ax-mp 5 |
. 2
⊢ if(𝐴 = 𝐵, 𝐶, ∅) = if(𝐵 = 𝐴, 𝐶, ∅) |
25 | 21, 24 | eqtrdi 2795 |
1
⊢ (𝐴 ∈ 𝑉 → (𝐴 Proj ({𝐵} × tag 𝐶)) = if(𝐵 = 𝐴, 𝐶, ∅)) |