Changeset 704 for LMDZ4/branches/V3_test/libf/phylmd/moy_undefSTD.F

Timestamp:

Aug 17, 2006, 5:41:51 PM (18 years ago)

Author:

Laurent Fairhead

Message:

Inclusion des modifs de Y. Meurdesoif pour la version V3
LF

File:

• LMDZ4/branches/V3_test/libf/phylmd/moy_undefSTD.F (modified) (2 diffs)

LMDZ4/branches/V3_test/libf/phylmd/moy_undefSTD.F

@@ -2 +2 @@
      $           dtime,ecrit_day,ecrit_mth,ecrit_hf2mth,
      $           tnondef,tsumSTD)
+      USE dimphy
       IMPLICIT none
 c
@@ -20 +21 @@
 c NB: mettre "inst(X)" dans le write_histXXX.h !
 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
 c variables Input