inductive
definition
ColloidRegime
show as:
view math explainer →
open explainer
Read the cached plain-language explainer.
open lean source
IndisputableMonolith.Chemistry.ColloidStabilityFromJCost on GitHub at line 18.
browse module
All declarations in this module, on Recognition.
explainer page
used by
formal source
15
16namespace IndisputableMonolith.Chemistry.ColloidStabilityFromJCost
17
18inductive ColloidRegime where
19 | electrostatic
20 | steric
21 | depletion
22 | gelForming
23 | flocculated
24 deriving DecidableEq, Repr, BEq, Fintype
25
26theorem colloidRegime_count : Fintype.card ColloidRegime = 5 := by decide
27
28structure ColloidStabilityCert where
29 five_regimes : Fintype.card ColloidRegime = 5
30
31def colloidStabilityCert : ColloidStabilityCert where
32 five_regimes := colloidRegime_count
33
34end IndisputableMonolith.Chemistry.ColloidStabilityFromJCost