preqlu - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > preqlu		GIF version

Theorem preqlu 7647

Description: Two reals are equal if and only if their lower and upper cuts are. (Contributed by Jim Kingdon, 11-Dec-2019.)

**Assertion**
Ref	Expression
preqlu	⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴 = 𝐵 ↔ ((1^st ‘𝐴) = (1^st ‘𝐵) ∧ (2^nd ‘𝐴) = (2^nd ‘𝐵))))

**Proof of Theorem preqlu**
Step	Hyp	Ref	Expression
1		npsspw 7646	. . . . 5 ⊢ P ⊆ (𝒫 Q × 𝒫 Q)
2	1	sseli 3220	. . . 4 ⊢ (𝐴 ∈ P → 𝐴 ∈ (𝒫 Q × 𝒫 Q))
3		1st2nd2 6311	. . . 4 ⊢ (𝐴 ∈ (𝒫 Q × 𝒫 Q) → 𝐴 = ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩)
4	2, 3	syl 14	. . 3 ⊢ (𝐴 ∈ P → 𝐴 = ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩)
5	1	sseli 3220	. . . 4 ⊢ (𝐵 ∈ P → 𝐵 ∈ (𝒫 Q × 𝒫 Q))
6		1st2nd2 6311	. . . 4 ⊢ (𝐵 ∈ (𝒫 Q × 𝒫 Q) → 𝐵 = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩)
7	5, 6	syl 14	. . 3 ⊢ (𝐵 ∈ P → 𝐵 = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩)
8	4, 7	eqeqan12d 2245	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴 = 𝐵 ↔ ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩))
9		xp1st 6301	. . . . 5 ⊢ (𝐴 ∈ (𝒫 Q × 𝒫 Q) → (1^st ‘𝐴) ∈ 𝒫 Q)
10	2, 9	syl 14	. . . 4 ⊢ (𝐴 ∈ P → (1^st ‘𝐴) ∈ 𝒫 Q)
11		xp2nd 6302	. . . . 5 ⊢ (𝐴 ∈ (𝒫 Q × 𝒫 Q) → (2^nd ‘𝐴) ∈ 𝒫 Q)
12	2, 11	syl 14	. . . 4 ⊢ (𝐴 ∈ P → (2^nd ‘𝐴) ∈ 𝒫 Q)
13		opthg 4323	. . . 4 ⊢ (((1^st ‘𝐴) ∈ 𝒫 Q ∧ (2^nd ‘𝐴) ∈ 𝒫 Q) → (⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ↔ ((1^st ‘𝐴) = (1^st ‘𝐵) ∧ (2^nd ‘𝐴) = (2^nd ‘𝐵))))
14	10, 12, 13	syl2anc 411	. . 3 ⊢ (𝐴 ∈ P → (⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ↔ ((1^st ‘𝐴) = (1^st ‘𝐵) ∧ (2^nd ‘𝐴) = (2^nd ‘𝐵))))
15	14	adantr 276	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ↔ ((1^st ‘𝐴) = (1^st ‘𝐵) ∧ (2^nd ‘𝐴) = (2^nd ‘𝐵))))
16	8, 15	bitrd 188	1 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴 = 𝐵 ↔ ((1^st ‘𝐴) = (1^st ‘𝐵) ∧ (2^nd ‘𝐴) = (2^nd ‘𝐵))))

Colors of variables: wff set class

Syntax hints: → wi 4 ∧ wa 104 ↔ wb 105 = wceq 1395 ∈ wcel 2200 𝒫 cpw 3649 ⟨cop 3669 × cxp 4714 ‘cfv 5314 1^st c1st 6274 2^nd c2nd 6275 Qcnq 7455 Pcnp 7466

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-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 4201 ax-pow 4257 ax-pr 4292 ax-un 4521

This theorem depends on definitions: df-bi 117 df-3an 1004 df-tru 1398 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-ral 2513 df-rex 2514 df-v 2801 df-sbc 3029 df-un 3201 df-in 3203 df-ss 3210 df-pw 3651 df-sn 3672 df-pr 3673 df-op 3675 df-uni 3888 df-br 4083 df-opab 4145 df-mpt 4146 df-id 4381 df-xp 4722 df-rel 4723 df-cnv 4724 df-co 4725 df-dm 4726 df-rn 4727 df-iota 5274 df-fun 5316 df-fv 5322 df-1st 6276 df-2nd 6277 df-inp 7641

This theorem is referenced by: genpassg 7701 addnqpr 7736 mulnqpr 7752 distrprg 7763 1idpr 7767 ltexpri 7788 addcanprg 7791 recexprlemex 7812 aptipr 7816

W3C validator