Index: LMDZ6/trunk/libf/phylmd/conf_phys_m.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/conf_phys_m.F90	(revision 3930)
+++ LMDZ6/trunk/libf/phylmd/conf_phys_m.F90	(revision 3932)
@@ -27,4 +27,6 @@
     USE phys_cal_mod
     USE carbon_cycle_mod,  ONLY: carbon_cycle_tr, carbon_cycle_cpl, carbon_cycle_rad, level_coupling_esm
+    USE carbon_cycle_mod,  ONLY: read_fco2_ocean_cor,var_fco2_ocean_cor
+    USE carbon_cycle_mod,  ONLY: read_fco2_land_cor,var_fco2_land_cor
     USE mod_grid_phy_lmdz, ONLY: klon_glo
     USE print_control_mod, ONLY: lunout
@@ -240,4 +242,8 @@
     LOGICAL, SAVE :: carbon_cycle_rad_omp
     INTEGER, SAVE :: level_coupling_esm_omp
+    LOGICAL, SAVE :: read_fco2_ocean_cor_omp
+    REAL, SAVE    :: var_fco2_ocean_cor_omp
+    LOGICAL, SAVE :: read_fco2_land_cor_omp
+    REAL, SAVE    :: var_fco2_land_cor_omp
     LOGICAL, SAVE :: adjust_tropopause_omp
     LOGICAL, SAVE :: ok_daily_climoz_omp
@@ -2302,5 +2308,16 @@
     CALL getin('carbon_cycle_rad',carbon_cycle_rad_omp)
 
-    ! >> PC
+    read_fco2_ocean_cor_omp=.FALSE.
+    CALL getin('read_fco2_ocean_cor',read_fco2_ocean_cor_omp)
+
+    var_fco2_ocean_cor_omp=0. ! default value
+    CALL getin('var_fco2_ocean_cor',var_fco2_ocean_cor_omp)
+
+    read_fco2_land_cor_omp=.FALSE.
+    CALL getin('read_fco2_land_cor',read_fco2_land_cor_omp)
+
+    var_fco2_land_cor_omp=0. ! default value
+    CALL getin('var_fco2_land_cor',var_fco2_land_cor_omp)
+
     ! level_coupling_esm : level of coupling of the biogeochemical fields between LMDZ, ORCHIDEE and NEMO
     ! Definitions of level_coupling_esm in physiq.def
@@ -2315,5 +2332,4 @@
     level_coupling_esm_omp=0 ! default value
     CALL getin('level_coupling_esm',level_coupling_esm_omp)
-    ! << PC
 
     !$OMP END MASTER
@@ -2592,4 +2608,8 @@
     carbon_cycle_rad = carbon_cycle_rad_omp
     level_coupling_esm = level_coupling_esm_omp
+    read_fco2_ocean_cor = read_fco2_ocean_cor_omp
+    var_fco2_ocean_cor = var_fco2_ocean_cor_omp
+    read_fco2_land_cor = read_fco2_land_cor_omp
+    var_fco2_land_cor = var_fco2_land_cor_omp
 
     ! Test of coherence between type_ocean and version_ocean
@@ -2916,4 +2936,8 @@
     WRITE(lunout,*) ' carbon_cycle_rad = ', carbon_cycle_rad
     WRITE(lunout,*) ' level_coupling_esm = ', level_coupling_esm
+    WRITE(lunout,*) ' read_fco2_ocean_cor = ', read_fco2_ocean_cor
+    WRITE(lunout,*) ' var_fco2_ocean_cor = ', var_fco2_ocean_cor
+    WRITE(lunout,*) ' read_fco2_land_cor = ', read_fco2_land_cor
+    WRITE(lunout,*) ' var_fco2_land_cor = ', var_fco2_land_cor
     WRITE(lunout,*) ' iflag_tsurf_inlandsis = ', iflag_tsurf_inlandsis
     WRITE(lunout,*) ' iflag_temp_inlandsis = ', iflag_temp_inlandsis