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

LMDZ4/trunk/libf/phylmd/ini_undefSTD.F

@@ -2 +2 @@
      $           dtime,ecrit_day,ecrit_mth,
      $           tnondef,tsumSTD)
+      USE dimphy
       IMPLICIT none
 c
@@ -26 +27 @@
 c====================================================================
 c
-#include "dimensions.h"
-      integer jjmp1
-      parameter (jjmp1=jjm+1-1/jjm)
-#include "dimphy.h"
+cym #include "dimensions.h"
+cym      integer jjmp1
+cym      parameter (jjmp1=jjm+1-1/jjm)
+cym #include "dimphy.h"
 c variables Input/Output
       INTEGER nlevSTD, klevSTD, itap