Changeset 793 for LMDZ4/trunk/libf/phylmd/surf_land_orchidee_mod.F90

Timestamp:

Jun 22, 2007, 2:49:51 PM (17 years ago)

Author:

Laurent Fairhead

Message:

Modifications suite a la transformation des fichiers include pour
qu'ils soient compatibles a la fois au format fixe et au format libre
Un bon nombre de fichiers *.inc du coup disparaissent
LF

File:

• LMDZ4/trunk/libf/phylmd/surf_land_orchidee_mod.F90 (modified) (3 diffs)

LMDZ4/trunk/libf/phylmd/surf_land_orchidee_mod.F90

@@ -90 +90 @@
 !
     INCLUDE "indicesol.h"
-    INCLUDE "temps.inc"
-    INCLUDE "YOMCST.inc"
+    INCLUDE "temps.h"
+    INCLUDE "YOMCST.h"
     INCLUDE "iniprint.h"
-    INCLUDE "dimensions90.h"
+    INCLUDE "dimensions.h"
   
 !
@@ -426 +426 @@
   SUBROUTINE Init_orchidee_index(knon,orch_comm,knindex,offset,ktindex)
     
-    INCLUDE "dimensions90.h"
+    INCLUDE "dimensions.h"
 
 #ifdef CPP_PARA
@@ -525 +525 @@
     
     INCLUDE "indicesol.h"
-    INCLUDE "dimensions90.h"
+    INCLUDE "dimensions.h"
 #ifdef CPP_PARA
     INCLUDE 'mpif.h'