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

ClimateFeedback

definition
show as:
view math explainer →
module
IndisputableMonolith.Physics.ClimatePhysicsFromRS
domain
Physics
line
24 · github
papers citing
none yet

open explainer

Generate a durable explainer page for this declaration.

open lean source

IndisputableMonolith.Physics.ClimatePhysicsFromRS on GitHub at line 24.

browse module

All declarations in this module, on Recognition.

explainer page

Tracked in the explainer inventory; generation is lazy so crawlers do not trigger LLM jobs.

open explainer

used by

formal source

  21namespace IndisputableMonolith.Physics.ClimatePhysicsFromRS
  22open Cost
  23
  24inductive ClimateFeedback where
  25  | waterVapor | iceAlbedo | planck | lapseRate | cloud
  26  deriving DecidableEq, Repr, BEq, Fintype
  27
  28theorem climateFeedbackCount : Fintype.card ClimateFeedback = 5 := by decide
  29
  30/-- Energy balance: J = 0. -/
  31theorem energy_balance : Jcost 1 = 0 := Jcost_unit0
  32
  33structure ClimatePhysicsCert where
  34  five_feedbacks : Fintype.card ClimateFeedback = 5
  35  balance : Jcost 1 = 0
  36
  37def climatePhysicsCert : ClimatePhysicsCert where
  38  five_feedbacks := climateFeedbackCount
  39  balance := energy_balance
  40
  41end IndisputableMonolith.Physics.ClimatePhysicsFromRS