Index: LMDZ5/branches/LMDZ5-DOFOCO/libf/phylmd/surf_land_orchidee_mod.F90
===================================================================
--- LMDZ5/branches/LMDZ5-DOFOCO/libf/phylmd/surf_land_orchidee_mod.F90	(revision 1940)
+++ LMDZ5/branches/LMDZ5-DOFOCO/libf/phylmd/surf_land_orchidee_mod.F90	(revision 1941)
@@ -369,6 +369,5 @@
     cdrag(1:knon) = tq_cdrag(1:knon)
 
-! zlev(1:knon) = (100.*plev(1:knon))/((ps(1:knon)/287.05*temp_air(1:knon))*9.80665)
-    zlev(1:knon) = (100.*plev(1:knon))/((ps(1:knon)/RD*temp_air(1:knon))*RG)
+    zlev(1:knon) = plev(1:knon)*RD*temp_air(1:knon)/((ps(1:knon)*100.0)*RG)