Changeset 766 for LMDZ4/trunk/libf/phylmd/flxtr.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/flxtr.F (modified) (2 diffs)

LMDZ4/trunk/libf/phylmd/flxtr.F

@@ -4 +4 @@
       SUBROUTINE flxtr(pdtime,pmfu,pmfd,pen_u,pde_u,pen_d,pde_d,
      .                 pt,pplay,paprs,kcbot,kctop,kdtop,x,dx) 
+      USE dimphy
       IMPLICIT NONE 
 c=====================================================================
@@ -24 +25 @@
 c=====================================================================
 c
-#include "dimensions.h"
-#include "dimphy.h"
+cym#include "dimensions.h"
+cym#include "dimphy.h"
 #include "YOMCST.h"
 #include "YOECUMF.h"