Changeset 2255 for LMDZ5/trunk/libf/phylmd/cva_driver.F90

Timestamp:

Apr 3, 2015, 3:51:31 PM (10 years ago)

Author:

jyg

Message:

Changes to pbl_surface and other routines concerning split/no-split.
+ pbl_surface_mod.F90: call cdrag for (w) region.
+ phyredem.F90: write wake_delta_pbl_TKE.
+ phys_output_write_mod.F90: control output of wake_delta_pbl_TKE by
IF(iflag_pbl_split>=1).
+ lmdz1d.F90: initialize wake_delta_pbl_TKE=0.
+ phys_output_ctrlout_mod.F90: suppression of accents in some variable
attributes.
+ cva_driver.F90: suppression of a print introduced in version 2253.

File:

• LMDZ5/trunk/libf/phylmd/cva_driver.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/cva_driver.F90

@@ -811 +811 @@
   ENDIF
 !
-  print *,' ncum, len, comp_threshold, compress ',ncum, len, comp_threshold, compress
 !>jyg
       CALL cv3a_compress(len, nloc, ncum, nd, ntra, compress, &
@@ -1116 +1115 @@
 
   IF (debut) THEN
-    PRINT *, ' cv_compress -> '
+    PRINT *, ' cv_uncompress -> '
     debut = .FALSE.
   END IF  !(debut) THEN