pith. machine review for the scientific record. sign in
def

leopoldMaddockExponents

definition
show as:
view math explainer →
module
IndisputableMonolith.Hydrology.HydraulicGeometryFromSigma
domain
Hydrology
line
125 · github
papers citing
none yet

open explainer

Read the cached plain-language explainer.

open lean source

IndisputableMonolith.Hydrology.HydraulicGeometryFromSigma on GitHub at line 125.

browse module

All declarations in this module, on Recognition.

explainer page

A cached Ask Recognition explainer exists for this declaration.

open explainer

depends on

used by

formal source

 122`(0.26, 0.40, 0.34)`: the cluster centre across U.S. Geological
 123Survey single-thread alluvial reaches surveyed in Leopold & Maddock
 1241953 *USGS PP 252* table 4. -/
 125noncomputable def leopoldMaddockExponents : HydraulicExponents where
 126  b := 26 / 100
 127  f := 40 / 100
 128  m := 34 / 100
 129  width_pos := by norm_num
 130  depth_pos := by norm_num
 131  velocity_pos := by norm_num
 132  closure := by norm_num
 133
 134/-! ## §3. Master certificate -/
 135
 136structure HydraulicGeometryCert where
 137  width_pos_of : ∀ h : HydraulicExponents, 0 < h.b
 138  depth_pos_of : ∀ h : HydraulicExponents, 0 < h.f
 139  velocity_pos_of : ∀ h : HydraulicExponents, 0 < h.m
 140  closure_of : ∀ h : HydraulicExponents, h.b + h.f + h.m = 1
 141  equipartition_inhabits : Nonempty HydraulicExponents
 142  empirical_inhabits : Nonempty HydraulicExponents
 143
 144noncomputable def hydraulicGeometryCert : HydraulicGeometryCert where
 145  width_pos_of := width_pos
 146  depth_pos_of := depth_pos
 147  velocity_pos_of := velocity_pos
 148  closure_of := closure_identity
 149  equipartition_inhabits := ⟨equipartitionExponents⟩
 150  empirical_inhabits := ⟨leopoldMaddockExponents⟩
 151
 152/-! ## §4. One-statement summary -/
 153
 154/-- **HYDRAULIC GEOMETRY ONE-STATEMENT.**
 155