| Intuitionistic Logic Explorer |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > ILE Home > Th. List > mulext | GIF version | ||
| Description: Strong extensionality for multiplication. Given excluded middle, apartness would be equivalent to negated equality and this would follow readily (for all operations) from oveq12 6022. For us, it is proved a different way. (Contributed by Jim Kingdon, 23-Feb-2020.) |
| Ref | Expression |
|---|---|
| mulext | ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 · 𝐵) # (𝐶 · 𝐷) → (𝐴 # 𝐶 ∨ 𝐵 # 𝐷))) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | simpll 527 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐴 ∈ ℂ) | |
| 2 | simplr 528 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐵 ∈ ℂ) | |
| 3 | 1, 2 | mulcld 8190 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐴 · 𝐵) ∈ ℂ) |
| 4 | simprl 529 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐶 ∈ ℂ) | |
| 5 | simprr 531 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐷 ∈ ℂ) | |
| 6 | 4, 5 | mulcld 8190 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐶 · 𝐷) ∈ ℂ) |
| 7 | 4, 2 | mulcld 8190 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐶 · 𝐵) ∈ ℂ) |
| 8 | apcotr 8777 | . . 3 ⊢ (((𝐴 · 𝐵) ∈ ℂ ∧ (𝐶 · 𝐷) ∈ ℂ ∧ (𝐶 · 𝐵) ∈ ℂ) → ((𝐴 · 𝐵) # (𝐶 · 𝐷) → ((𝐴 · 𝐵) # (𝐶 · 𝐵) ∨ (𝐶 · 𝐷) # (𝐶 · 𝐵)))) | |
| 9 | 3, 6, 7, 8 | syl3anc 1271 | . 2 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 · 𝐵) # (𝐶 · 𝐷) → ((𝐴 · 𝐵) # (𝐶 · 𝐵) ∨ (𝐶 · 𝐷) # (𝐶 · 𝐵)))) |
| 10 | mulext1 8782 | . . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐶 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 · 𝐵) # (𝐶 · 𝐵) → 𝐴 # 𝐶)) | |
| 11 | 1, 4, 2, 10 | syl3anc 1271 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 · 𝐵) # (𝐶 · 𝐵) → 𝐴 # 𝐶)) |
| 12 | mulext2 8783 | . . . . 5 ⊢ ((𝐷 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐶 · 𝐷) # (𝐶 · 𝐵) → 𝐷 # 𝐵)) | |
| 13 | 5, 2, 4, 12 | syl3anc 1271 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐶 · 𝐷) # (𝐶 · 𝐵) → 𝐷 # 𝐵)) |
| 14 | apsym 8776 | . . . . 5 ⊢ ((𝐷 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐷 # 𝐵 ↔ 𝐵 # 𝐷)) | |
| 15 | 5, 2, 14 | syl2anc 411 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐷 # 𝐵 ↔ 𝐵 # 𝐷)) |
| 16 | 13, 15 | sylibd 149 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐶 · 𝐷) # (𝐶 · 𝐵) → 𝐵 # 𝐷)) |
| 17 | 11, 16 | orim12d 791 | . 2 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (((𝐴 · 𝐵) # (𝐶 · 𝐵) ∨ (𝐶 · 𝐷) # (𝐶 · 𝐵)) → (𝐴 # 𝐶 ∨ 𝐵 # 𝐷))) |
| 18 | 9, 17 | syld 45 | 1 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 · 𝐵) # (𝐶 · 𝐷) → (𝐴 # 𝐶 ∨ 𝐵 # 𝐷))) |
| Colors of variables: wff set class |
| Syntax hints: → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 713 ∈ wcel 2200 class class class wbr 4086 (class class class)co 6013 ℂcc 8020 · cmul 8027 # cap 8751 |
| This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 106 ax-ia2 107 ax-ia3 108 ax-in1 617 ax-in2 618 ax-io 714 ax-5 1493 ax-7 1494 ax-gen 1495 ax-ie1 1539 ax-ie2 1540 ax-8 1550 ax-10 1551 ax-11 1552 ax-i12 1553 ax-bndl 1555 ax-4 1556 ax-17 1572 ax-i9 1576 ax-ial 1580 ax-i5r 1581 ax-13 2202 ax-14 2203 ax-ext 2211 ax-sep 4205 ax-pow 4262 ax-pr 4297 ax-un 4528 ax-setind 4633 ax-cnex 8113 ax-resscn 8114 ax-1cn 8115 ax-1re 8116 ax-icn 8117 ax-addcl 8118 ax-addrcl 8119 ax-mulcl 8120 ax-mulrcl 8121 ax-addcom 8122 ax-mulcom 8123 ax-addass 8124 ax-mulass 8125 ax-distr 8126 ax-i2m1 8127 ax-0lt1 8128 ax-1rid 8129 ax-0id 8130 ax-rnegex 8131 ax-precex 8132 ax-cnre 8133 ax-pre-ltirr 8134 ax-pre-ltwlin 8135 ax-pre-lttrn 8136 ax-pre-apti 8137 ax-pre-ltadd 8138 ax-pre-mulgt0 8139 ax-pre-mulext 8140 |
| This theorem depends on definitions: df-bi 117 df-3an 1004 df-tru 1398 df-fal 1401 df-nf 1507 df-sb 1809 df-eu 2080 df-mo 2081 df-clab 2216 df-cleq 2222 df-clel 2225 df-nfc 2361 df-ne 2401 df-nel 2496 df-ral 2513 df-rex 2514 df-reu 2515 df-rab 2517 df-v 2802 df-sbc 3030 df-dif 3200 df-un 3202 df-in 3204 df-ss 3211 df-pw 3652 df-sn 3673 df-pr 3674 df-op 3676 df-uni 3892 df-br 4087 df-opab 4149 df-id 4388 df-xp 4729 df-rel 4730 df-cnv 4731 df-co 4732 df-dm 4733 df-iota 5284 df-fun 5326 df-fv 5332 df-riota 5966 df-ov 6016 df-oprab 6017 df-mpo 6018 df-pnf 8206 df-mnf 8207 df-ltxr 8209 df-sub 8342 df-neg 8343 df-reap 8745 df-ap 8752 |
| This theorem is referenced by: mulap0r 8785 lt2msq 9056 apexp1 10970 absext 11614 |
| Copyright terms: Public domain | W3C validator |