Changeset 1516 for trunk/LMDZ.GENERIC/libf/phystd/comsoil_h.F90

Timestamp:

Mar 17, 2016, 9:45:36 AM (9 years ago)

Author:

emillour

Message:

Generic model:

• Added tests to ensure that soil model settings are adequate to resolve sub-surface diurnal and annual thermal waves.

EM

File:

• trunk/LMDZ.GENERIC/libf/phystd/comsoil_h.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/comsoil_h.F90

@@ -6 +6 @@
 !integer, parameter :: nsoilmx = 13 ! for z1=0.03 m, depth = 104.8 m => earth case
   integer, parameter :: nsoilmx = 18
+! Full soil layer depths are set as: layer(k)=lay1*alpha**(k-1) , k=1,nsoil
+! Mid soil layer depths are set as: mlayer(k)=lay1*alpha**(k-1/2) , k=0,nsoil-1 
+  real,parameter :: lay1=2.e-4 ! depth of first full soil layer
+  real,parameter :: alpha=2
 
   real,save,allocatable,dimension(:) :: layer      ! soil layer depths