Changeset 965 for LMDZ4/trunk/libf/phylmd/cv_driver.F

Timestamp:

Jun 9, 2008, 11:56:40 AM (16 years ago)

Author:

Laurent Fairhead

Message:

Un peu de menage pour avoir moins de sorties a l'execution
LF

File:

• LMDZ4/trunk/libf/phylmd/cv_driver.F (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/cv_driver.F

@@ -375 +375 @@
       if (iflag_con.eq.30) then
 
-       print*,'Emanuel version 30 '
+!       print*,'Emanuel version 30 '
        CALL cv30_prelim(len,nd,ndp1,t1,q1,p1,ph1            ! nd->na
      o               ,lv1,cpn1,tv1,gz1,h1,hm1,th1)