Changeset 3857 for LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90

Timestamp:

Feb 26, 2021, 8:37:59 PM (3 years ago)

Author:

oboucher

Message:

Additions for the interactive carbon cycle

File:

• LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90

@@ -1321 +1321 @@
   TYPE(ctrl_out), SAVE :: o_flx_co2_land = ctrl_out((/ 11, 11, 11, 11, 11, 11, 11, 11, 11, 1/), &
     'flx_co2_land', 'CO2 flux from the land', '1', (/ ('', i=1, 10) /))
+  TYPE(ctrl_out), SAVE :: o_flx_co2_ocean_cor = ctrl_out((/ 11, 11, 11, 11, 11, 11, 11, 11, 11, 1/), &
+    'flx_co2_ocean_cor', 'correction of the CO2 flux from the ocean', 'kg CO2 m-2 s-1', (/ ('', i=1, 10) /))
+  TYPE(ctrl_out), SAVE :: o_flx_co2_land_cor = ctrl_out((/ 11, 11, 11, 11, 11, 11, 11, 11, 11, 1/), &
+    'flx_co2_land_cor', 'correction of the CO2 flux from the land', 'kg CO2 m-2 s-1', (/ ('', i=1, 10) /))
 
 #ifdef CPP_StratAer