preqlu - Intuitionistic Logic Explorer

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

Theorem preqlu 7789

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 7788	. . . . 5 ⊢ P ⊆ (𝒫 Q × 𝒫 Q)
2	1	sseli 3236	. . . 4 ⊢ (𝐴 ∈ P → 𝐴 ∈ (𝒫 Q × 𝒫 Q))
3		1st2nd2 6371	. . . 4 ⊢ (𝐴 ∈ (𝒫 Q × 𝒫 Q) → 𝐴 = ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩)
4	2, 3	syl 14	. . 3 ⊢ (𝐴 ∈ P → 𝐴 = ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩)
5	1	sseli 3236	. . . 4 ⊢ (𝐵 ∈ P → 𝐵 ∈ (𝒫 Q × 𝒫 Q))
6		1st2nd2 6371	. . . 4 ⊢ (𝐵 ∈ (𝒫 Q × 𝒫 Q) → 𝐵 = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩)
7	5, 6	syl 14	. . 3 ⊢ (𝐵 ∈ P → 𝐵 = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩)
8	4, 7	eqeqan12d 2250	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴 = 𝐵 ↔ ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩))
9		xp1st 6361	. . . . 5 ⊢ (𝐴 ∈ (𝒫 Q × 𝒫 Q) → (1^st ‘𝐴) ∈ 𝒫 Q)
10	2, 9	syl 14	. . . 4 ⊢ (𝐴 ∈ P → (1^st ‘𝐴) ∈ 𝒫 Q)
11		xp2nd 6362	. . . . 5 ⊢ (𝐴 ∈ (𝒫 Q × 𝒫 Q) → (2^nd ‘𝐴) ∈ 𝒫 Q)
12	2, 11	syl 14	. . . 4 ⊢ (𝐴 ∈ P → (2^nd ‘𝐴) ∈ 𝒫 Q)
13		opthg 4356	. . . 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 1398 ∈ wcel 2205 𝒫 cpw 3671 ⟨cop 3694 × cxp 4749 ‘cfv 5354 1^st c1st 6334 2^nd c2nd 6335 Qcnq 7597 Pcnp 7608

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 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

This theorem depends on definitions: df-bi 117 df-3an 1007 df-tru 1401 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-ral 2527 df-rex 2528 df-v 2817 df-sbc 3045 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-mpt 4175 df-id 4416 df-xp 4757 df-rel 4758 df-cnv 4759 df-co 4760 df-dm 4761 df-rn 4762 df-iota 5314 df-fun 5356 df-fv 5362 df-1st 6336 df-2nd 6337 df-inp 7783

This theorem is referenced by: genpassg 7843 addnqpr 7878 mulnqpr 7894 distrprg 7905 1idpr 7909 ltexpri 7930 addcanprg 7933 recexprlemex 7954 aptipr 7958

W3C validator