Index: /LMDZ.3.3/branches/rel-LF/libf/phylmd/conf_phys.F90
===================================================================
--- /LMDZ.3.3/branches/rel-LF/libf/phylmd/conf_phys.F90	(revision 479)
+++ /LMDZ.3.3/branches/rel-LF/libf/phylmd/conf_phys.F90	(revision 480)
@@ -40,4 +40,5 @@
 ! Local
   integer              :: numout = 6
+  real                 :: zzz
 
 !
@@ -159,5 +160,5 @@
   RCO2 = co2_ppm * 1.0e-06  * 44.011/28.97 ! pour co2_ppm=348.
 
-  call getin('RCO2', RCO2)
+!!  call getin('RCO2', RCO2)
 !!
 !Config Key  = RCH4
@@ -174,6 +175,7 @@
 ! RCH4 = 1.72E-06* 16.043/28.97
 !OK call getin('RCH4', RCH4)
-  CH4_ppb = 1650.
-  call getin('CH4_ppb', CH4_ppb)
+  zzz = 1650.
+  call getin('CH4_ppb', zzz)
+  CH4_ppb = zzz
   RCH4 = CH4_ppb * 1.0E-09 * 16.043/28.97
 !!
@@ -191,6 +193,7 @@
 ! RN2O = 310.E-09* 44.013/28.97
 !OK  call getin('RN2O', RN2O)
-  N2O_ppb=306.
-  call getin('N2O_ppb', N2O_ppb)
+  zzz=306.
+  call getin('N2O_ppb', zzz)
+  N2O_ppb = zzz
   RN2O = N2O_ppb * 1.0E-09 * 44.013/28.97
 !!
@@ -202,6 +205,7 @@
 !
 !OK RCFC11 = 280.E-12* 137.3686/28.97
-  CFC11_ppt = 280.
-  call getin('CFC11_ppt',CFC11_ppt)
+  zzz = 280.
+  call getin('CFC11_ppt',zzz)
+  CFC11_ppt = zzz
   RCFC11=CFC11_ppt* 1.0E-12 * 137.3686/28.97
 ! RCFC11 = 1.327690990680013E-09
@@ -215,6 +219,7 @@
 !
 !OK RCFC12 = 484.E-12* 120.9140/28.97
-  CFC12_ppt = 484.
-  call getin('CFC12_ppt',CFC12_ppt)
+  zzz = 484.
+  call getin('CFC12_ppt',zzz)
+  CFC12_ppt = zzz
   RCFC12 = CFC12_ppt * 1.0E-12 * 120.9140/28.97
 ! RCFC12 = 2.020102726958923E-09
