Theorem: Real.hausdorffMeasure_of_finrank_lt
File: Mathlib/Topology/MetricSpace/HausdorffDimension.lean

Proof steps:
state_before: ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ
hd : ↑(finrank ℝ E) < d
⊢ μH[d] = 0
state_after: case intro
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ μH[↑d] = 0
tactic: lift d to ℝ≥0 using (Nat.cast_nonneg _).trans hd.le
state_before: case intro
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ μH[↑d] = 0
state_after: case intro
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ μH[↑d] univ = 0
tactic: rw [← measure_univ_eq_zero]
state_before: case intro
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ μH[↑d] univ = 0
state_after: case intro.h
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ dimH univ < ↑d
tactic: apply hausdorffMeasure_of_dimH_lt
state_before: case intro.h
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ dimH univ < ↑d
state_after: case intro.h
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ ↑(finrank ℝ E) < ↑d
tactic: rw [dimH_univ_eq_finrank]
state_before: case intro.h
ι : Type u_1
X : Type u_2
Y : Type u_3
inst✝⁷ : EMetricSpace X
inst✝⁶ : EMetricSpace Y
C K r : ℝ≥0
f : X → Y
s t : Set X
E : Type u_4
inst✝⁵ : Fintype ι
inst✝⁴ : NormedAddCommGroup E
inst✝³ : NormedSpace ℝ E
inst✝² : FiniteDimensional ℝ E
inst✝¹ : MeasurableSpace E
inst✝ : BorelSpace E
d : ℝ≥0
hd : ↑(finrank ℝ E) < ↑d
⊢ ↑(finrank ℝ E) < ↑d
state_after: no goals
tactic: exact mod_cast hd