Theorem supminfxrrnmpt 45454

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 2729	. . . 4 ⊢ (𝑥 ∈ 𝐴 ↦ 𝐵) = (𝑥 ∈ 𝐴 ↦ 𝐵)
3		supminfxrrnmpt.b	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℝ*)
4	1, 2, 3	rnmptssd 45178	. . 3 ⊢ (𝜑 → ran (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ*)
5	4	supminfxr2 45452	. 2 ⊢ (𝜑 → sup(ran (𝑥 ∈ 𝐴 ↦ 𝐵), ℝ*, < ) = -𝑒inf({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}, ℝ*, < ))
6		xnegex 13110	. . . . . . . . . . . 12 ⊢ -𝑒𝑦 ∈ V
7	2	elrnmpt 5900	. . . . . . . . . . . 12 ⊢ (-𝑒𝑦 ∈ V → (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) ↔ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵))
8	6, 7	ax-mp 5	. . . . . . . . . . 11 ⊢ (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) ↔ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵)
9	8	biimpi 216	. . . . . . . . . 10 ⊢ (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵)
10		eqid 2729	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝐴 ↦ -𝑒𝐵) = (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)
11		xnegneg 13116	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ* → -𝑒-𝑒𝑦 = 𝑦)
12	11	eqcomd 2735	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ* → 𝑦 = -𝑒-𝑒𝑦)
13	12	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 = 𝐵) → 𝑦 = -𝑒-𝑒𝑦)
14		xnegeq 13109	. . . . . . . . . . . . . . . 16 ⊢ (-𝑒𝑦 = 𝐵 → -𝑒-𝑒𝑦 = -𝑒𝐵)
15	14	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 = 𝐵) → -𝑒-𝑒𝑦 = -𝑒𝐵)
16	13, 15	eqtrd 2764	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 = 𝐵) → 𝑦 = -𝑒𝐵)
17	16	ex 412	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℝ* → (-𝑒𝑦 = 𝐵 → 𝑦 = -𝑒𝐵))
18	17	reximdv 3144	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℝ* → (∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵 → ∃𝑥 ∈ 𝐴 𝑦 = -𝑒𝐵))
19	18	imp 406	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℝ* ∧ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵) → ∃𝑥 ∈ 𝐴 𝑦 = -𝑒𝐵)
20		simpl 482	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℝ* ∧ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵) → 𝑦 ∈ ℝ*)
21	10, 19, 20	elrnmptd 5905	. . . . . . . . . 10 ⊢ ((𝑦 ∈ ℝ* ∧ ∃𝑥 ∈ 𝐴 -𝑒𝑦 = 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
22	9, 21	sylan2 593	. . . . . . . . 9 ⊢ ((𝑦 ∈ ℝ* ∧ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
23	22	ex 412	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ* → (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)))
24	23	rgen 3046	. . . . . . 7 ⊢ ∀𝑦 ∈ ℝ* (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
25		rabss 4023	. . . . . . . 8 ⊢ ({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵) ↔ ∀𝑦 ∈ ℝ* (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)))
26	25	biimpri 228	. . . . . . 7 ⊢ (∀𝑦 ∈ ℝ* (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) → 𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)) → {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
27	24, 26	ax-mp 5	. . . . . 6 ⊢ {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵)
28	27	a1i 11	. . . . 5 ⊢ (𝜑 → {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} ⊆ ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
29		nfcv 2891	. . . . . . . 8 ⊢ Ⅎ𝑥-𝑒𝑦
30		nfmpt1 5191	. . . . . . . . 9 ⊢ Ⅎ𝑥(𝑥 ∈ 𝐴 ↦ 𝐵)
31	30	nfrn 5894	. . . . . . . 8 ⊢ Ⅎ𝑥ran (𝑥 ∈ 𝐴 ↦ 𝐵)
32	29, 31	nfel 2906	. . . . . . 7 ⊢ Ⅎ𝑥-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)
33		nfcv 2891	. . . . . . 7 ⊢ Ⅎ𝑥ℝ*
34	32, 33	nfrabw 3432	. . . . . 6 ⊢ Ⅎ𝑥{𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}
35		xnegeq 13109	. . . . . . . 8 ⊢ (𝑦 = -𝑒𝐵 → -𝑒𝑦 = -𝑒-𝑒𝐵)
36	35	eleq1d 2813	. . . . . . 7 ⊢ (𝑦 = -𝑒𝐵 → (-𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵) ↔ -𝑒-𝑒𝐵 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)))
37	3	xnegcld 13202	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒𝐵 ∈ ℝ*)
38		xnegneg 13116	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ* → -𝑒-𝑒𝐵 = 𝐵)
39	3, 38	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒-𝑒𝐵 = 𝐵)
40		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴)
41	2, 40, 3	elrnmpt1d 5906	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵))
42	39, 41	eqeltrd 2828	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒-𝑒𝐵 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵))
43	36, 37, 42	elrabd 3650	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -𝑒𝐵 ∈ {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)})
44	1, 34, 10, 43	rnmptssdf 45236	. . . . 5 ⊢ (𝜑 → ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵) ⊆ {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)})
45	28, 44	eqssd 3953	. . . 4 ⊢ (𝜑 → {𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)} = ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵))
46	45	infeq1d 9368	. . 3 ⊢ (𝜑 → inf({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}, ℝ*, < ) = inf(ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵), ℝ*, < ))
47	46	xnegeqd 45420	. 2 ⊢ (𝜑 → -𝑒inf({𝑦 ∈ ℝ* ∣ -𝑒𝑦 ∈ ran (𝑥 ∈ 𝐴 ↦ 𝐵)}, ℝ*, < ) = -𝑒inf(ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵), ℝ*, < ))
48	5, 47	eqtrd 2764	1 ⊢ (𝜑 → sup(ran (𝑥 ∈ 𝐴 ↦ 𝐵), ℝ*, < ) = -𝑒inf(ran (𝑥 ∈ 𝐴 ↦ -𝑒𝐵), ℝ*, < ))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540  Ⅎwnf 1783   ∈ wcel 2109  ∀wral 3044  ∃wrex 3053  {crab 3394  Vcvv 3436   ⊆ wss 3903   ↦ cmpt 5173  ran crn 5620  supcsup 9330  infcinf 9331  ℝ^*cxr 11148   < clt 11149  -_𝑒cxne 13011

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-sep 5235  ax-nul 5245  ax-pow 5304  ax-pr 5371  ax-un 7671  ax-cnex 11065  ax-resscn 11066  ax-1cn 11067  ax-icn 11068  ax-addcl 11069  ax-addrcl 11070  ax-mulcl 11071  ax-mulrcl 11072  ax-mulcom 11073  ax-addass 11074  ax-mulass 11075  ax-distr 11076  ax-i2m1 11077  ax-1ne0 11078  ax-1rid 11079  ax-rnegex 11080  ax-rrecex 11081  ax-cnre 11082  ax-pre-lttri 11083  ax-pre-lttrn 11084  ax-pre-ltadd 11085  ax-pre-mulgt0 11086  ax-pre-sup 11087

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3343  df-reu 3344  df-rab 3395  df-v 3438  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-nul 4285  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4859  df-br 5093  df-opab 5155  df-mpt 5174  df-id 5514  df-po 5527  df-so 5528  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-iota 6438  df-fun 6484  df-fn 6485  df-f 6486  df-f1 6487  df-fo 6488  df-f1o 6489  df-fv 6490  df-isom 6491  df-riota 7306  df-ov 7352  df-oprab 7353  df-mpo 7354  df-er 8625  df-en 8873  df-dom 8874  df-sdom 8875  df-sup 9332  df-inf 9333  df-pnf 11151  df-mnf 11152  df-xr 11153  df-ltxr 11154  df-le 11155  df-sub 11349  df-neg 11350  df-xneg 13014

This theorem is referenced by:  liminfvalxr  45768