Changeset 766 for LMDZ4/trunk/libf/phylmd/cltrac.F

Timestamp:

Jun 4, 2007, 4:34:47 PM (17 years ago)

Author:

Laurent Fairhead

Message:

Merge entre la version V3_conv et le HEAD
YM, JG, LF

File:

• LMDZ4/trunk/libf/phylmd/cltrac.F (modified) (2 diffs)

LMDZ4/trunk/libf/phylmd/cltrac.F

@@ -4 +4 @@
       SUBROUTINE cltrac(dtime,coef,t,tr,flux,paprs,pplay,delp,
      s                  d_tr)
+      USE dimphy
       IMPLICIT none
 c======================================================================
@@ -25 +26 @@
 c flux_tr--output-R- flux de tr
 c======================================================================
-#include "dimensions.h"
-#include "dimphy.h"
+cym#include "dimensions.h"
+cym#include "dimphy.h"
       REAL dtime
       REAL coef(klon,klev)