Changeset 256 in lmdz_wrf for trunk/WRFV3

Timestamp:

Feb 11, 2015, 5:22:30 PM (10 years ago)

Author:

lfita

Message:

Removiong psfcTendValues printing

File:

• trunk/WRFV3/phys/module_lmdz_phys.F (modified) (1 diff)

trunk/WRFV3/phys/module_lmdz_phys.F

@@ -1283 +1283 @@
     END IF
 
-    PRINT *,'  Lluis psfctendValues ______________ '
-    DO ix=1,4*INT(ddimxy/4),4
-      PRINT *,(ix+iy,':',psfctendValues(ix+iy), iy=0,3)
-    END DO
-    PRINT *,(iy,':',psfctendValues(iy), iy=4*INT(ddimxy/4)+1,ddimxy)
+!    PRINT *,'  Lluis psfctendValues ______________ '
+!    DO ix=1,4*INT(ddimxy/4),4
+!      PRINT *,(ix+iy,':',psfctendValues(ix+iy), iy=0,3)
+!    END DO
+!    PRINT *,(iy,':',psfctendValues(iy), iy=4*INT(ddimxy/4)+1,ddimxy)
 
 ! All the tendencies have to be given as decoupled from the dry air mass column! (see dyn_em/module_em.F:rk_update_scalar)