Theorem preimalegt 45727

Description: The preimage of a left-open, unbounded above interval, is the complement of a right-closed unbounded below interval. (Contributed by Glauco Siliprandi, 26-Jun-2021.)

Hypotheses

Ref	Expression
preimalegt.x	⊢ Ⅎ𝑥𝜑
preimalegt.b	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℝ*)
preimalegt.c	⊢ (𝜑 → 𝐶 ∈ ℝ*)

Assertion

Ref	Expression
preimalegt	⊢ (𝜑 → (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) = {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵})

Distinct variable group:   𝑥,𝐴

Allowed substitution hints:   𝜑(𝑥)   𝐵(𝑥)   𝐶(𝑥)

Proof of Theorem preimalegt

Step	Hyp	Ref	Expression
1		preimalegt.x	. 2 ⊢ Ⅎ𝑥𝜑
2		nfcv 2902	. . 3 ⊢ Ⅎ𝑥𝐴
3		nfrab1 3450	. . 3 ⊢ Ⅎ𝑥{𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}
4	2, 3	nfdif 4125	. 2 ⊢ Ⅎ𝑥(𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})
5		nfrab1 3450	. 2 ⊢ Ⅎ𝑥{𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}
6		eldifi 4126	. . . . 5 ⊢ (𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) → 𝑥 ∈ 𝐴)
7	6	adantl 481	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})) → 𝑥 ∈ 𝐴)
8		eldifn 4127	. . . . . . 7 ⊢ (𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) → ¬ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})
9	6	anim1i 614	. . . . . . . 8 ⊢ ((𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) ∧ 𝐵 ≤ 𝐶) → (𝑥 ∈ 𝐴 ∧ 𝐵 ≤ 𝐶))
10		rabid 3451	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶} ↔ (𝑥 ∈ 𝐴 ∧ 𝐵 ≤ 𝐶))
11	9, 10	sylibr 233	. . . . . . 7 ⊢ ((𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) ∧ 𝐵 ≤ 𝐶) → 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})
12	8, 11	mtand 813	. . . . . 6 ⊢ (𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) → ¬ 𝐵 ≤ 𝐶)
13	12	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})) → ¬ 𝐵 ≤ 𝐶)
14		preimalegt.c	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ ℝ*)
15	14	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})) → 𝐶 ∈ ℝ*)
16		preimalegt.b	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℝ*)
17	6, 16	sylan2 592	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})) → 𝐵 ∈ ℝ*)
18	15, 17	xrltnled 44384	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})) → (𝐶 < 𝐵 ↔ ¬ 𝐵 ≤ 𝐶))
19	13, 18	mpbird 257	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})) → 𝐶 < 𝐵)
20		rabid 3451	. . . 4 ⊢ (𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵} ↔ (𝑥 ∈ 𝐴 ∧ 𝐶 < 𝐵))
21	7, 19, 20	sylanbrc 582	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})) → 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵})
22		rabidim1 3452	. . . . 5 ⊢ (𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵} → 𝑥 ∈ 𝐴)
23	22	adantl 481	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → 𝑥 ∈ 𝐴)
24		rabidim2 44105	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵} → 𝐶 < 𝐵)
25	24	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → 𝐶 < 𝐵)
26	14	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → 𝐶 ∈ ℝ*)
27	22, 16	sylan2 592	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → 𝐵 ∈ ℝ*)
28	26, 27	xrltnled 44384	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → (𝐶 < 𝐵 ↔ ¬ 𝐵 ≤ 𝐶))
29	25, 28	mpbid 231	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → ¬ 𝐵 ≤ 𝐶)
30	29	intnand 488	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → ¬ (𝑥 ∈ 𝐴 ∧ 𝐵 ≤ 𝐶))
31	30, 10	sylnibr 329	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → ¬ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶})
32	23, 31	eldifd 3959	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}) → 𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}))
33	21, 32	impbida 798	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) ↔ 𝑥 ∈ {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵}))
34	1, 4, 5, 33	eqrd 4001	1 ⊢ (𝜑 → (𝐴 ∖ {𝑥 ∈ 𝐴 ∣ 𝐵 ≤ 𝐶}) = {𝑥 ∈ 𝐴 ∣ 𝐶 < 𝐵})

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   = wceq 1540  Ⅎwnf 1784   ∈ wcel 2105  {crab 3431   ∖ cdif 3945   class class class wbr 5148  ℝ^*cxr 11254   < clt 11255   ≤ cle 11256

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-sep 5299  ax-nul 5306  ax-pr 5427

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ral 3061  df-rex 3070  df-rab 3432  df-v 3475  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-nul 4323  df-if 4529  df-sn 4629  df-pr 4631  df-op 4635  df-br 5149  df-opab 5211  df-xp 5682  df-cnv 5684  df-le 11261

This theorem is referenced by:  salpreimalegt  45736