Changeset 8220 for branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/sechiba.f90

Timestamp:

2023-10-10T15:50:31+02:00 (8 months ago)

Author:

anne.cozic

Message:

Add initialization of ptnlev1 used in chemistry (specific case of VOC coupling between atm and surf) before it was calculated by thermosoil_main

File:

• branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/sechiba.f90 (modified) (1 diff)

branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/sechiba.f90

@@ -517 +517 @@
          mc_layh,  mcl_layh,   soilmoist,       njsc ,     &
          frac_snow_veg,frac_snow_nobio,totfrac_nobio,     &
-         snowdz, snowrho, snowtemp, lambda_snow, cgrnd_snow, dgrnd_snow, pb)
+         snowdz, snowrho, snowtemp, lambda_snow, cgrnd_snow, dgrnd_snow, pb, &
+         ptnlev1)