Changeset 110 for codes/icosagcm/trunk/src/advect_tracer.f90

Timestamp:

08/07/12 19:10:05 (12 years ago)

Author:

ymipsl

Message:

Correction for dcmip moist physics
Temperature is ouput instead of virtual temperature.

YM

File:

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

codes/icosagcm/trunk/src/advect_tracer.f90

@@ -2 +2 @@
   USE icosa
   PRIVATE
-  INTEGER,PARAMETER::iapp_tracvl= 3
+  INTEGER,PARAMETER::iapp_tracvl= 1
 
   TYPE(t_field),POINTER :: f_normal(:)