{ INITIALIZATION EQUATIONS }
INIT ATMOSPHERE = 700

INIT Surface_Ocean = 700

Ocean_Uptake = ATMOSPHERE/20
INIT Deep_Ocean = 35000

Upwelling = Deep_Ocean*.002
Downwelling = Surface_Ocean*.002
Biopump = 6.76+Surface_Ocean/700
Ocean_degassing = Surface_Ocean/20
INIT Terrestrial_Biosphere = 550

Season = 1+
(COS(2*PI*(time+0.125)))
Respiration = Terrestrial_Biosphere*.1*Season
INIT Soil_Carbon_and_Detritus = 1200

Photosynthesis = (Terrestrial_Biosphere*.1483+ATMOSPHERE/700)*Season
Death = .05*Terrestrial_Biosphere
Decay = .021*Soil_Carbon_and_Detritus+ATMOSPHERE/750
Fossil_Fuel_Burning = 5
Deforestation = 2
AtmCO2 = ATMOSPHERE/2

{ RUNTIME EQUATIONS }
ATMOSPHERE(t) = ATMOSPHERE(t - dt) + (Ocean_degassing + Respiration + Decay + Fossil_Fuel_Burning + Deforestation - Ocean_Uptake - Photosynthesis) * dt

Surface_Ocean(t) = Surface_Ocean(t - dt) + (Ocean_Uptake + Upwelling - Ocean_degassing - Downwelling - Biopump) * dt

Deep_Ocean(t) = Deep_Ocean(t - dt) + (Downwelling + Biopump - Upwelling) * dt

Terrestrial_Biosphere(t) = Terrestrial_Biosphere(t - dt) + (Photosynthesis - Respiration - Death - Deforestation) * dt

Soil_Carbon_and_Detritus(t) = Soil_Carbon_and_Detritus(t - dt) + (Death - D ecay) * dt

Ocean_Uptake = ATMOSPHERE/20
Upwelling = Deep_Ocean*.002
Downwelling = Surface_Ocean*.002
Biopump = 6.76+Surface_Ocean/700
Ocean_degassing = Surface_Ocean/20
Season = 1+
(COS(2*PI*(time+0.125)))
Respiration = Terrestrial_Biosphere*.1*Season
Photosynthesis = (Terrestrial_Biosphere*.1483+ATMOSPHERE/700)*Season
Death = .05*Terrestrial_Biosphere
Decay = .021*Soil_Carbon_and_Detritus+ATMOSPHERE/750
AtmCO2 = ATMOSPHERE/2