Changeset 967 for codes/icosagcm/trunk/src

Timestamp:

08/30/19 13:26:23 (5 years ago)

Author:

sfromang

Message:

set tracers densities to zero in held-suarez test case intialisation (needed for correct start of aquaplanet configurations)

File:

• codes/icosagcm/trunk/src/initial/etat0_heldsz.f90 (modified) (1 diff)

codes/icosagcm/trunk/src/initial/etat0_heldsz.f90

@@ -92 +92 @@
        IF(nqtot>0) THEN
           q=f_q(ind)
-          q(:,:,1)=1e-2
+          q(:,:,1)=0.
           IF(nqtot>1) q(:,:,2)=0
-          IF(nqtot>2) q(:,:,3:)=1e-2
+          IF(nqtot>2) q(:,:,3:)=0.
        END IF
     ENDDO