| Intuitionistic Logic Explorer |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > ILE Home > Th. List > pr2ne | GIF version | ||
| Description: If an unordered pair has two elements they are different. (Contributed by FL, 14-Feb-2010.) |
| Ref | Expression |
|---|---|
| pr2ne | ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} ≈ 2o ↔ 𝐴 ≠ 𝐵)) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | preq2 3771 | . . . . 5 ⊢ (𝐵 = 𝐴 → {𝐴, 𝐵} = {𝐴, 𝐴}) | |
| 2 | 1 | eqcoms 2237 | . . . 4 ⊢ (𝐴 = 𝐵 → {𝐴, 𝐵} = {𝐴, 𝐴}) |
| 3 | enpr1g 7040 | . . . . . 6 ⊢ (𝐴 ∈ 𝐶 → {𝐴, 𝐴} ≈ 1o) | |
| 4 | 3 | adantr 276 | . . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → {𝐴, 𝐴} ≈ 1o) |
| 5 | prexg 4327 | . . . . . . 7 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → {𝐴, 𝐵} ∈ V) | |
| 6 | eqeng 7007 | . . . . . . 7 ⊢ ({𝐴, 𝐵} ∈ V → ({𝐴, 𝐵} = {𝐴, 𝐴} → {𝐴, 𝐵} ≈ {𝐴, 𝐴})) | |
| 7 | 5, 6 | syl 14 | . . . . . 6 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} = {𝐴, 𝐴} → {𝐴, 𝐵} ≈ {𝐴, 𝐴})) |
| 8 | entr 7026 | . . . . . . . . 9 ⊢ (({𝐴, 𝐵} ≈ {𝐴, 𝐴} ∧ {𝐴, 𝐴} ≈ 1o) → {𝐴, 𝐵} ≈ 1o) | |
| 9 | 1nen2 7117 | . . . . . . . . . . 11 ⊢ ¬ 1o ≈ 2o | |
| 10 | ensym 7023 | . . . . . . . . . . . 12 ⊢ ({𝐴, 𝐵} ≈ 1o → 1o ≈ {𝐴, 𝐵}) | |
| 11 | entr 7026 | . . . . . . . . . . . . 13 ⊢ ((1o ≈ {𝐴, 𝐵} ∧ {𝐴, 𝐵} ≈ 2o) → 1o ≈ 2o) | |
| 12 | 11 | ex 115 | . . . . . . . . . . . 12 ⊢ (1o ≈ {𝐴, 𝐵} → ({𝐴, 𝐵} ≈ 2o → 1o ≈ 2o)) |
| 13 | 10, 12 | syl 14 | . . . . . . . . . . 11 ⊢ ({𝐴, 𝐵} ≈ 1o → ({𝐴, 𝐵} ≈ 2o → 1o ≈ 2o)) |
| 14 | 9, 13 | mtoi 670 | . . . . . . . . . 10 ⊢ ({𝐴, 𝐵} ≈ 1o → ¬ {𝐴, 𝐵} ≈ 2o) |
| 15 | 14 | a1d 22 | . . . . . . . . 9 ⊢ ({𝐴, 𝐵} ≈ 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ¬ {𝐴, 𝐵} ≈ 2o)) |
| 16 | 8, 15 | syl 14 | . . . . . . . 8 ⊢ (({𝐴, 𝐵} ≈ {𝐴, 𝐴} ∧ {𝐴, 𝐴} ≈ 1o) → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ¬ {𝐴, 𝐵} ≈ 2o)) |
| 17 | 16 | ex 115 | . . . . . . 7 ⊢ ({𝐴, 𝐵} ≈ {𝐴, 𝐴} → ({𝐴, 𝐴} ≈ 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ¬ {𝐴, 𝐵} ≈ 2o))) |
| 18 | 17 | com3r 79 | . . . . . 6 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} ≈ {𝐴, 𝐴} → ({𝐴, 𝐴} ≈ 1o → ¬ {𝐴, 𝐵} ≈ 2o))) |
| 19 | 7, 18 | syld 45 | . . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} = {𝐴, 𝐴} → ({𝐴, 𝐴} ≈ 1o → ¬ {𝐴, 𝐵} ≈ 2o))) |
| 20 | 4, 19 | mpid 42 | . . . 4 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} = {𝐴, 𝐴} → ¬ {𝐴, 𝐵} ≈ 2o)) |
| 21 | 2, 20 | syl5 32 | . . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → (𝐴 = 𝐵 → ¬ {𝐴, 𝐵} ≈ 2o)) |
| 22 | 21 | necon2ad 2471 | . 2 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} ≈ 2o → 𝐴 ≠ 𝐵)) |
| 23 | pr2nelem 7490 | . . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷 ∧ 𝐴 ≠ 𝐵) → {𝐴, 𝐵} ≈ 2o) | |
| 24 | 23 | 3expia 1232 | . 2 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → (𝐴 ≠ 𝐵 → {𝐴, 𝐵} ≈ 2o)) |
| 25 | 22, 24 | impbid 129 | 1 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} ≈ 2o ↔ 𝐴 ≠ 𝐵)) |
| Colors of variables: wff set class |
| Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 = wceq 1398 ∈ wcel 2205 ≠ wne 2414 Vcvv 2815 {cpr 3692 class class class wbr 4111 1oc1o 6642 2oc2o 6643 ≈ cen 6975 |
| 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-nul 4238 ax-pow 4289 ax-pr 4324 ax-un 4556 ax-setind 4661 ax-iinf 4712 |
| This theorem depends on definitions: df-bi 117 df-dc 843 df-3or 1006 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-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-nul 3511 df-pw 3673 df-sn 3697 df-pr 3698 df-op 3700 df-uni 3917 df-int 3952 df-br 4112 df-opab 4174 df-tr 4211 df-id 4416 df-iord 4489 df-on 4491 df-suc 4494 df-iom 4715 df-xp 4757 df-rel 4758 df-cnv 4759 df-co 4760 df-dm 4761 df-rn 4762 df-res 4763 df-ima 4764 df-iota 5314 df-fun 5356 df-fn 5357 df-f 5358 df-f1 5359 df-fo 5360 df-f1o 5361 df-fv 5362 df-1o 6649 df-2o 6650 df-er 6769 df-en 6978 |
| This theorem is referenced by: en2prde 7492 pr1or2 7493 exmidonfinlem 7498 pw1dom2 7539 isprm2lem 12817 umgrbien 16122 umgrnloopv 16126 upgr1een 16136 umgredgne 16162 usgr1e 16253 vdegp1aid 16326 vdegp1bid 16327 konigsberglem1 16500 |
| Copyright terms: Public domain | W3C validator |