Changeset 940 for LMDZ4/trunk/libf/phylmd/readsulfate.F

Timestamp:

Apr 7, 2008, 4:33:30 PM (16 years ago)

Author:

Laurent Fairhead

Message:

On remplace le fichier include dimphy.h par le module dimphy.F90i pour etre
coherent avec le partout
LF

File:

• LMDZ4/trunk/libf/phylmd/readsulfate.F (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/readsulfate.F

@@ -537 +537 @@
 
       SUBROUTINE getso4fromfile (cyr, so4)
+      use dimphy
 #include "netcdf.inc"
 #include "dimensions.h"      
-#include "dimphy.h"
+cccc#include "dimphy.h"
       CHARACTER*15 fname
       CHARACTER*4 cyr