Theorem supminfxrrnmpt 46262

Description: The indexed supremum of a set of reals is the negation of the indexed infimum of that set's image under negation. (Contributed by Glauco Siliprandi, 2-Jan-2022.)

Hypotheses

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

Assertion

Ref	Expression
supminfxrrnmpt	⊢ (𝜑 → sup(ran (𝑥 ∈ 𝐴 ↦ 𝐵), ℝ*, < ) = -𝑒inf(ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵), ℝ*, < ))

Distinct variable group:   𝑥,𝐴

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

Proof of Theorem supminfxrrnmpt

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		supminfxrrnmpt.x	. . . 4 ⊢ Ⅎ𝑥𝜑
2		eqid 2765	. . . 4 ⊢ (𝑥 ∈ 𝐴 ↦ 𝐵) = (𝑥 ∈ 𝐴 ↦ 𝐵)
3		supminfxrrnmpt.b	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℝ*)
4	1, 2, 3	rnmptssd 7123	. . 3 ⊢ (𝜑 → ran (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ*)
5	4	supminfxr2 46260	. 2 ⊢ (𝜑 → sup(ran (𝑥 ∈ 𝐴 ↦ 𝐵), ℝ*, < ) = -𝑒inf({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}, ℝ*, < ))
6		xnegex 13254	. . . . . . . . . . . 12 ⊢ -𝑒𝑦 ∈ V
7	2	elrnmpt 5950	. . . . . . . . . . . 12 ⊢ (-𝑒𝑦 ∈ V → (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) ↔ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵))
8	6, 7	ax-mp 5	. . . . . . . . . . 11 ⊢ (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) ↔ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵)
9	8	biimpi 219	. . . . . . . . . 10 ⊢ (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵)
10		eqid 2765	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝐴 ↦ -𝑒𝐵) = (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)
11		xnegneg 13260	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ* → -𝑒-𝑒𝑦 = 𝑦)
12	11	eqcomd 2771	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ* → 𝑦 = -𝑒-𝑒𝑦)
13	12	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 = 𝐵) → 𝑦 = -𝑒-𝑒𝑦)
14		xnegeq 13253	. . . . . . . . . . . . . . . 16 ⊢ (-𝑒𝑦 = 𝐵 → -𝑒-𝑒𝑦 = -𝑒𝐵)
15	14	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 = 𝐵) → -𝑒-𝑒𝑦 = -𝑒𝐵)
16	13, 15	eqtrd 2800	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 = 𝐵) → 𝑦 = -𝑒𝐵)
17	16	ex 418	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℝ* → (-𝑒𝑦 = 𝐵 → 𝑦 = -𝑒𝐵))
18	17	reximdv 3182	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℝ* → (∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵 → ∃𝑥 ∈ 𝐴 𝑦 = -𝑒𝐵))
19	18	imp 412	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℝ* ∧ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵) → ∃𝑥 ∈ 𝐴 𝑦 = -𝑒𝐵)
20		simpl 488	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℝ* ∧ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵) → 𝑦 ∈ ℝ*)
21	10, 19, 20	elrnmptd 5955	. . . . . . . . . 10 ⊢ ((𝑦 ∈ ℝ* ∧ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
22	9, 21	sylan2 605	. . . . . . . . 9 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
23	22	ex 418	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ* → (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)))
24	23	rgen 3083	. . . . . . 7 ⊢ ∀𝑦 ∈ ℝ* (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
25		rabss 4025	. . . . . . . 8 ⊢ ({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵) ↔ ∀𝑦 ∈ ℝ* (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)))
26	25	biimpri 231	. . . . . . 7 ⊢ (∀𝑦 ∈ ℝ* (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)) → {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
27	24, 26	ax-mp 5	. . . . . 6 ⊢ {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)
28	27	a1i 11	. . . . 5 ⊢ (𝜑 → {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
29		nfcv 2927	. . . . . . . 8 ⊢ Ⅎ𝑥-𝑒𝑦
30		nfmpt1 5212	. . . . . . . . 9 ⊢ Ⅎ𝑥(𝑥 ∈ 𝐴 ↦ 𝐵)
31	30	nfrn 5944	. . . . . . . 8 ⊢ Ⅎ𝑥ran (𝑥 ∈ 𝐴 ↦ 𝐵)
32	29, 31	nfel 2941	. . . . . . 7 ⊢ Ⅎ𝑥-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)
33		nfcv 2927	. . . . . . 7 ⊢ Ⅎ𝑥ℝ*
34	32, 33	nfrabw 3454	. . . . . 6 ⊢ Ⅎ𝑥{𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}
35		xnegeq 13253	. . . . . . . 8 ⊢ (𝑦 = -𝑒𝐵 → -𝑒𝑦 = -𝑒-𝑒𝐵)
36	35	eleq1d 2850	. . . . . . 7 ⊢ (𝑦 = -𝑒𝐵 → (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) ↔ -𝑒-𝑒𝐵 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)))
37	3	xnegcld 13346	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒𝐵 ∈ ℝ*)
38		xnegneg 13260	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ* → -𝑒-𝑒𝐵 = 𝐵)
39	3, 38	syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒-𝑒𝐵 = 𝐵)
40		simpr 490	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴)
41	2, 40, 3	elrnmpt1d 5956	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵))
42	39, 41	eqeltrd 2865	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒-𝑒𝐵 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵))
43	36, 37, 42	elrabd 3654	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒𝐵 ∈ {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)})
44	1, 34, 10, 43	rnmptssdf 46046	. . . . 5 ⊢ (𝜑 → ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵) ⊆ {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)})
45	28, 44	eqssd 3955	. . . 4 ⊢ (𝜑 → {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} = ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
46	45	infeq1d 9445	. . 3 ⊢ (𝜑 → inf({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}, ℝ*, < ) = inf(ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵), ℝ*, < ))
47	46	xnegeqd 46228	. 2 ⊢ (𝜑 → -𝑒inf({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}, ℝ*, < ) = -𝑒inf(ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵), ℝ*, < ))
48	5, 47	eqtrd 2800	1 ⊢ (𝜑 → sup(ran (𝑥 ∈ 𝐴 ↦ 𝐵), ℝ*, < ) = -𝑒inf(ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵), ℝ*, < ))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570  Ⅎwnf 1816   ∈ wcel 2146  ∀wral 3081  ∃wrex 3091  {crab 3418  Vcvv 3457   ⊆ wss 3906   ↦ cmpt 5194  ran crn 5664  supcsup 9407  infcinf 9408  ℝ^*cxr 11261   < clt 11262  -_𝑒cxne 13154

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7742  ax-cnex 11175  ax-resscn 11176  ax-1cn 11177  ax-icn 11178  ax-addcl 11179  ax-addrcl 11180  ax-mulcl 11181  ax-mulrcl 11182  ax-mulcom 11183  ax-addass 11184  ax-mulass 11185  ax-distr 11186  ax-i2m1 11187  ax-1ne0 11188  ax-1rid 11189  ax-rnegex 11190  ax-rrecex 11191  ax-cnre 11192  ax-pre-lttri 11193  ax-pre-lttrn 11194  ax-pre-ltadd 11195  ax-pre-mulgt0 11196  ax-pre-sup 11197

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-br 5112  df-opab 5176  df-mpt 5195  df-id 5558  df-po 5571  df-so 5572  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7376  df-ov 7422  df-oprab 7423  df-mpo 7424  df-er 8700  df-en 8950  df-dom 8951  df-sdom 8952  df-sup 9409  df-inf 9410  df-pnf 11264  df-mnf 11265  df-xr 11266  df-ltxr 11267  df-le 11268  df-sub 11462  df-neg 11463  df-xneg 13157

This theorem is used by:  liminfvalxr  46574