| 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 3753 | . . . . 5 ⊢ (𝐵 = 𝐴 → {𝐴, 𝐵} = {𝐴, 𝐴}) | |
| 2 | 1 | eqcoms 2234 | . . . 4 ⊢ (𝐴 = 𝐵 → {𝐴, 𝐵} = {𝐴, 𝐴}) |
| 3 | enpr1g 7015 | . . . . . 6 ⊢ (𝐴 ∈ 𝐶 → {𝐴, 𝐴} ≈ 1o) | |
| 4 | 3 | adantr 276 | . . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → {𝐴, 𝐴} ≈ 1o) |
| 5 | prexg 4307 | . . . . . . 7 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → {𝐴, 𝐵} ∈ V) | |
| 6 | eqeng 6982 | . . . . . . 7 ⊢ ({𝐴, 𝐵} ∈ V → ({𝐴, 𝐵} = {𝐴, 𝐴} → {𝐴, 𝐵} ≈ {𝐴, 𝐴})) | |
| 7 | 5, 6 | syl 14 | . . . . . 6 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} = {𝐴, 𝐴} → {𝐴, 𝐵} ≈ {𝐴, 𝐴})) |
| 8 | entr 7001 | . . . . . . . . 9 ⊢ (({𝐴, 𝐵} ≈ {𝐴, 𝐴} ∧ {𝐴, 𝐴} ≈ 1o) → {𝐴, 𝐵} ≈ 1o) | |
| 9 | 1nen2 7090 | . . . . . . . . . . 11 ⊢ ¬ 1o ≈ 2o | |
| 10 | ensym 6998 | . . . . . . . . . . . 12 ⊢ ({𝐴, 𝐵} ≈ 1o → 1o ≈ {𝐴, 𝐵}) | |
| 11 | entr 7001 | . . . . . . . . . . . . 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 2460 | . 2 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐷) → ({𝐴, 𝐵} ≈ 2o → 𝐴 ≠ 𝐵)) |
| 23 | pr2nelem 7439 | . . 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 2202 ≠ wne 2403 Vcvv 2803 {cpr 3674 class class class wbr 4093 1oc1o 6618 2oc2o 6619 ≈ cen 6950 |
| 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 2204 ax-14 2205 ax-ext 2213 ax-sep 4212 ax-nul 4220 ax-pow 4270 ax-pr 4305 ax-un 4536 ax-setind 4641 ax-iinf 4692 |
| 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 1811 df-eu 2082 df-mo 2083 df-clab 2218 df-cleq 2224 df-clel 2227 df-nfc 2364 df-ne 2404 df-ral 2516 df-rex 2517 df-reu 2518 df-rab 2520 df-v 2805 df-sbc 3033 df-dif 3203 df-un 3205 df-in 3207 df-ss 3214 df-nul 3497 df-pw 3658 df-sn 3679 df-pr 3680 df-op 3682 df-uni 3899 df-int 3934 df-br 4094 df-opab 4156 df-tr 4193 df-id 4396 df-iord 4469 df-on 4471 df-suc 4474 df-iom 4695 df-xp 4737 df-rel 4738 df-cnv 4739 df-co 4740 df-dm 4741 df-rn 4742 df-res 4743 df-ima 4744 df-iota 5293 df-fun 5335 df-fn 5336 df-f 5337 df-f1 5338 df-fo 5339 df-f1o 5340 df-fv 5341 df-1o 6625 df-2o 6626 df-er 6745 df-en 6953 |
| This theorem is referenced by: en2prde 7441 pr1or2 7442 exmidonfinlem 7447 pw1dom2 7488 isprm2lem 12751 umgrbien 16034 umgrnloopv 16038 upgr1een 16048 umgredgne 16074 usgr1e 16165 vdegp1aid 16238 vdegp1bid 16239 konigsberglem1 16412 |
| Copyright terms: Public domain | W3C validator |