| Intuitionistic Logic Explorer |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > ILE Home > Th. List > addext | GIF version | ||
| Description: Strong extensionality for addition. Given excluded middle, apartness would be equivalent to negated equality and this would follow readily (for all operations) from oveq12 6061. For us, it is proved a different way. (Contributed by Jim Kingdon, 15-Feb-2020.) |
| Ref | Expression |
|---|---|
| addext | ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 + 𝐵) # (𝐶 + 𝐷) → (𝐴 # 𝐶 ∨ 𝐵 # 𝐷))) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | simpll 527 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐴 ∈ ℂ) | |
| 2 | simplr 529 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐵 ∈ ℂ) | |
| 3 | 1, 2 | addcld 8298 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐴 + 𝐵) ∈ ℂ) |
| 4 | simprl 531 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐶 ∈ ℂ) | |
| 5 | simprr 533 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → 𝐷 ∈ ℂ) | |
| 6 | 4, 5 | addcld 8298 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐶 + 𝐷) ∈ ℂ) |
| 7 | 4, 2 | addcld 8298 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐶 + 𝐵) ∈ ℂ) |
| 8 | apcotr 8886 | . . 3 ⊢ (((𝐴 + 𝐵) ∈ ℂ ∧ (𝐶 + 𝐷) ∈ ℂ ∧ (𝐶 + 𝐵) ∈ ℂ) → ((𝐴 + 𝐵) # (𝐶 + 𝐷) → ((𝐴 + 𝐵) # (𝐶 + 𝐵) ∨ (𝐶 + 𝐷) # (𝐶 + 𝐵)))) | |
| 9 | 3, 6, 7, 8 | syl3anc 1274 | . 2 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 + 𝐵) # (𝐶 + 𝐷) → ((𝐴 + 𝐵) # (𝐶 + 𝐵) ∨ (𝐶 + 𝐷) # (𝐶 + 𝐵)))) |
| 10 | apadd1 8887 | . . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐶 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 # 𝐶 ↔ (𝐴 + 𝐵) # (𝐶 + 𝐵))) | |
| 11 | 1, 4, 2, 10 | syl3anc 1274 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐴 # 𝐶 ↔ (𝐴 + 𝐵) # (𝐶 + 𝐵))) |
| 12 | apadd2 8888 | . . . . 5 ⊢ ((𝐵 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐶 ∈ ℂ) → (𝐵 # 𝐷 ↔ (𝐶 + 𝐵) # (𝐶 + 𝐷))) | |
| 13 | 2, 5, 4, 12 | syl3anc 1274 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐵 # 𝐷 ↔ (𝐶 + 𝐵) # (𝐶 + 𝐷))) |
| 14 | apsym 8885 | . . . . 5 ⊢ (((𝐶 + 𝐵) ∈ ℂ ∧ (𝐶 + 𝐷) ∈ ℂ) → ((𝐶 + 𝐵) # (𝐶 + 𝐷) ↔ (𝐶 + 𝐷) # (𝐶 + 𝐵))) | |
| 15 | 7, 6, 14 | syl2anc 411 | . . . 4 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐶 + 𝐵) # (𝐶 + 𝐷) ↔ (𝐶 + 𝐷) # (𝐶 + 𝐵))) |
| 16 | 13, 15 | bitrd 188 | . . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → (𝐵 # 𝐷 ↔ (𝐶 + 𝐷) # (𝐶 + 𝐵))) |
| 17 | 11, 16 | orbi12d 801 | . 2 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 # 𝐶 ∨ 𝐵 # 𝐷) ↔ ((𝐴 + 𝐵) # (𝐶 + 𝐵) ∨ (𝐶 + 𝐷) # (𝐶 + 𝐵)))) |
| 18 | 9, 17 | sylibrd 169 | 1 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐶 ∈ ℂ ∧ 𝐷 ∈ ℂ)) → ((𝐴 + 𝐵) # (𝐶 + 𝐷) → (𝐴 # 𝐶 ∨ 𝐵 # 𝐷))) |
| Colors of variables: wff set class |
| Syntax hints: → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 716 ∈ wcel 2205 class class class wbr 4111 (class class class)co 6052 ℂcc 8130 + caddc 8135 # cap 8860 |
| 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 619 ax-in2 620 ax-io 717 ax-5 1496 ax-7 1497 ax-gen 1498 ax-ie1 1542 ax-ie2 1543 ax-8 1553 ax-10 1554 ax-11 1555 ax-i12 1556 ax-bndl 1558 ax-4 1559 ax-17 1575 ax-i9 1579 ax-ial 1583 ax-i5r 1584 ax-13 2207 ax-14 2208 ax-ext 2216 ax-sep 4230 ax-pow 4289 ax-pr 4324 ax-un 4556 ax-setind 4661 ax-cnex 8223 ax-resscn 8224 ax-1cn 8225 ax-1re 8226 ax-icn 8227 ax-addcl 8228 ax-addrcl 8229 ax-mulcl 8230 ax-mulrcl 8231 ax-addcom 8232 ax-mulcom 8233 ax-addass 8234 ax-mulass 8235 ax-distr 8236 ax-i2m1 8237 ax-0lt1 8238 ax-1rid 8239 ax-0id 8240 ax-rnegex 8241 ax-precex 8242 ax-cnre 8243 ax-pre-ltirr 8244 ax-pre-ltwlin 8245 ax-pre-lttrn 8246 ax-pre-apti 8247 ax-pre-ltadd 8248 ax-pre-mulgt0 8249 |
| This theorem depends on definitions: df-bi 117 df-3an 1007 df-tru 1401 df-fal 1404 df-nf 1510 df-sb 1812 df-eu 2085 df-mo 2086 df-clab 2221 df-cleq 2227 df-clel 2230 df-nfc 2375 df-ne 2415 df-nel 2510 df-ral 2527 df-rex 2528 df-reu 2529 df-rab 2531 df-v 2817 df-sbc 3045 df-dif 3215 df-un 3217 df-in 3219 df-ss 3226 df-pw 3673 df-sn 3697 df-pr 3698 df-op 3700 df-uni 3917 df-br 4112 df-opab 4174 df-id 4416 df-xp 4757 df-rel 4758 df-cnv 4759 df-co 4760 df-dm 4761 df-iota 5314 df-fun 5356 df-fv 5362 df-riota 6005 df-ov 6055 df-oprab 6056 df-mpo 6057 df-pnf 8315 df-mnf 8316 df-ltxr 8318 df-sub 8451 df-neg 8452 df-reap 8854 df-ap 8861 |
| This theorem is referenced by: mulext1 8891 abs00ap 11755 absext 11756 |
| Copyright terms: Public domain | W3C validator |