Theorem ovnssle 47844

Description: The (multidimensional) Lebesgue outer measure of a subset is less than the L.o.m. of the whole set. This is step (iii) of the proof of Proposition 115D (a) of [Fremlin1] p. 30. (Contributed by Glauco Siliprandi, 11-Oct-2020.)

Hypotheses

Ref	Expression
ovnssle.1	⊢ (𝜑 → 𝑋 ∈ Fin)
ovnssle.2	⊢ (𝜑 → 𝐴 ⊆ 𝐵)
ovnssle.3	⊢ (𝜑 → 𝐵 ⊆ (ℝ ↑m 𝑋))

Assertion

Ref	Expression
ovnssle	⊢ (𝜑 → ((voln*‘𝑋)‘𝐴) ≤ ((voln*‘𝑋)‘𝐵))

Proof of Theorem ovnssle

Dummy variables 𝑖 𝑧 𝑗 𝑘 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		0le0 12484	. . . 4 ⊢ 0 ≤ 0
2	1	a1i 11	. . 3 ⊢ ((𝜑 ∧ 𝑋 = ∅) → 0 ≤ 0)
3		fveq2 6916	. . . . . . 7 ⊢ (𝑋 = ∅ → (voln*‘𝑋) = (voln*‘∅))
4	3	fveq1d 6918	. . . . . 6 ⊢ (𝑋 = ∅ → ((voln*‘𝑋)‘𝐴) = ((voln*‘∅)‘𝐴))
5	4	adantl 487	. . . . 5 ⊢ ((𝜑 ∧ 𝑋 = ∅) → ((voln*‘𝑋)‘𝐴) = ((voln*‘∅)‘𝐴))
6		ovnssle.2	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ⊆ 𝐵)
7	6	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑋 = ∅) → 𝐴 ⊆ 𝐵)
8		ovnssle.3	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ⊆ (ℝ ↑m 𝑋))
9	8	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑋 = ∅) → 𝐵 ⊆ (ℝ ↑m 𝑋))
10		simpr 490	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑋 = ∅) → 𝑋 = ∅)
11	10	oveq2d 7467	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑋 = ∅) → (ℝ ↑m 𝑋) = (ℝ ↑m ∅))
12	9, 11	sseqtrd 3949	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑋 = ∅) → 𝐵 ⊆ (ℝ ↑m ∅))
13	7, 12	sstrd 3923	. . . . . 6 ⊢ ((𝜑 ∧ 𝑋 = ∅) → 𝐴 ⊆ (ℝ ↑m ∅))
14	13	ovn0val 47833	. . . . 5 ⊢ ((𝜑 ∧ 𝑋 = ∅) → ((voln*‘∅)‘𝐴) = 0)
15	5, 14	eqtrd 2798	. . . 4 ⊢ ((𝜑 ∧ 𝑋 = ∅) → ((voln*‘𝑋)‘𝐴) = 0)
16	3	fveq1d 6918	. . . . . 6 ⊢ (𝑋 = ∅ → ((voln*‘𝑋)‘𝐵) = ((voln*‘∅)‘𝐵))
17	16	adantl 487	. . . . 5 ⊢ ((𝜑 ∧ 𝑋 = ∅) → ((voln*‘𝑋)‘𝐵) = ((voln*‘∅)‘𝐵))
18	12	ovn0val 47833	. . . . 5 ⊢ ((𝜑 ∧ 𝑋 = ∅) → ((voln*‘∅)‘𝐵) = 0)
19	17, 18	eqtrd 2798	. . . 4 ⊢ ((𝜑 ∧ 𝑋 = ∅) → ((voln*‘𝑋)‘𝐵) = 0)
20	15, 19	breq12d 5121	. . 3 ⊢ ((𝜑 ∧ 𝑋 = ∅) → (((voln*‘𝑋)‘𝐴) ≤ ((voln*‘𝑋)‘𝐵) ↔ 0 ≤ 0))
21	2, 20	mpbird 260	. 2 ⊢ ((𝜑 ∧ 𝑋 = ∅) → ((voln*‘𝑋)‘𝐴) ≤ ((voln*‘𝑋)‘𝐵))
22		ovnssle.1	. . . 4 ⊢ (𝜑 → 𝑋 ∈ Fin)
23	22	adantr 486	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 = ∅) → 𝑋 ∈ Fin)
24		neqne 2967	. . . 4 ⊢ (¬ 𝑋 = ∅ → 𝑋 ≠ ∅)
25	24	adantl 487	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 = ∅) → 𝑋 ≠ ∅)
26	6	adantr 486	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 = ∅) → 𝐴 ⊆ 𝐵)
27	8	adantr 486	. . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 = ∅) → 𝐵 ⊆ (ℝ ↑m 𝑋))
28		eqid 2763	. . 3 ⊢ {𝑧 ∈ ℝ* ∣ ∃𝑖 ∈ (((ℝ × ℝ) ↑m 𝑋) ↑m ℕ)(𝐴 ⊆ ∪ 𝑗 ∈ ℕ X𝑘 ∈ 𝑋 (([,) ∘ (𝑖‘𝑗))‘𝑘) ∧ 𝑧 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ 𝑋 (vol‘(([,) ∘ (𝑖‘𝑗))‘𝑘)))))} = {𝑧 ∈ ℝ* ∣ ∃𝑖 ∈ (((ℝ × ℝ) ↑m 𝑋) ↑m ℕ)(𝐴 ⊆ ∪ 𝑗 ∈ ℕ X𝑘 ∈ 𝑋 (([,) ∘ (𝑖‘𝑗))‘𝑘) ∧ 𝑧 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ 𝑋 (vol‘(([,) ∘ (𝑖‘𝑗))‘𝑘)))))}
29		eqid 2763	. . 3 ⊢ {𝑧 ∈ ℝ* ∣ ∃𝑖 ∈ (((ℝ × ℝ) ↑m 𝑋) ↑m ℕ)(𝐵 ⊆ ∪ 𝑗 ∈ ℕ X𝑘 ∈ 𝑋 (([,) ∘ (𝑖‘𝑗))‘𝑘) ∧ 𝑧 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ 𝑋 (vol‘(([,) ∘ (𝑖‘𝑗))‘𝑘)))))} = {𝑧 ∈ ℝ* ∣ ∃𝑖 ∈ (((ℝ × ℝ) ↑m 𝑋) ↑m ℕ)(𝐵 ⊆ ∪ 𝑗 ∈ ℕ X𝑘 ∈ 𝑋 (([,) ∘ (𝑖‘𝑗))‘𝑘) ∧ 𝑧 = (Σ^‘(𝑗 ∈ ℕ ↦ ∏𝑘 ∈ 𝑋 (vol‘(([,) ∘ (𝑖‘𝑗))‘𝑘)))))}
30	23, 25, 26, 27, 28, 29	ovnsslelem 47843	. 2 ⊢ ((𝜑 ∧ ¬ 𝑋 = ∅) → ((voln*‘𝑋)‘𝐴) ≤ ((voln*‘𝑋)‘𝐵))
31	21, 30	pm2.61dan 825	1 ⊢ (𝜑 → ((voln*‘𝑋)‘𝐴) ≤ ((voln*‘𝑋)‘𝐵))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2147   ≠ wne 2959  ∃wrex 3090  {crab 3416   ⊆ wss 3900  ∅c0 4281  ∪ ciun 4956   class class class wbr 5108   ↦ cmpt 5192   × cxp 5656   ∘ ccom 5662  ‘cfv 6566  (class class class)co 7451   ↑_m cmap 8885  Xcixp 8963  Fincfn 9011  ℝcr 11238  0cc0 11239  ℝ^*cxr 11381   ≤ cle 11383  ℕcn 12375  [,)cico 13518  ∏cprod 16116  volcvol 25839  Σ^{^}csumge0 47645  voln*covoln 47819

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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783  ax-cnex 11295  ax-resscn 11296  ax-1cn 11297  ax-icn 11298  ax-addcl 11299  ax-addrcl 11300  ax-mulcl 11301  ax-mulrcl 11302  ax-mulcom 11303  ax-addass 11304  ax-mulass 11305  ax-distr 11306  ax-i2m1 11307  ax-1ne0 11308  ax-1rid 11309  ax-rnegex 11310  ax-rrecex 11311  ax-cnre 11312  ax-pre-lttri 11313  ax-pre-lttrn 11314  ax-pre-ltadd 11315  ax-pre-mulgt0 11316  ax-pre-sup 11317

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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-pred 6330  df-ord 6391  df-on 6392  df-lim 6393  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-riota 7408  df-ov 7454  df-oprab 7455  df-mpo 7456  df-om 7912  df-frecs 8337  df-wrecs 8368  df-recs 8417  df-rdg 8456  df-er 8755  df-ixp 8964  df-en 9012  df-dom 9013  df-sdom 9014  df-fin 9015  df-sup 9471  df-inf 9472  df-pnf 11384  df-mnf 11385  df-xr 11386  df-ltxr 11387  df-le 11388  df-sub 11582  df-neg 11583  df-seq 14185  df-prod 16117  df-ovoln 47820

This theorem is used by:  ovnome  47856  hspmbllem3  47911