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

earthLayerCount

proved
show as:
view math explainer →
module
IndisputableMonolith.Physics.GeophysicsFromRS
domain
Physics
line
26 · github
papers citing
none yet

open explainer

Generate a durable explainer page for this declaration.

open lean source

IndisputableMonolith.Physics.GeophysicsFromRS on GitHub at line 26.

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

depends on

used by

formal source

  23  | innerCore | outerCore | lowerMantle | upperMantle | crust
  24  deriving DecidableEq, Repr, BEq, Fintype
  25
  26theorem earthLayerCount : Fintype.card EarthLayer = 5 := by decide
  27
  28inductive GeophysicalObservable where
  29  | seismicity | gravimetry | geomagnetism | heatFlow | gpsGeodesy
  30  deriving DecidableEq, Repr, BEq, Fintype
  31
  32theorem geophysicalObservableCount : Fintype.card GeophysicalObservable = 5 := by decide
  33
  34structure GeophysicsCert where
  35  five_layers : Fintype.card EarthLayer = 5
  36  five_observables : Fintype.card GeophysicalObservable = 5
  37
  38def geophysicsCert : GeophysicsCert where
  39  five_layers := earthLayerCount
  40  five_observables := geophysicalObservableCount
  41
  42end IndisputableMonolith.Physics.GeophysicsFromRS