Changeset 717

Timestamp:

Oct 6, 2006, 11:49:33 AM (18 years ago)

Author:

Laurent Fairhead

Message:

Modifs pour compilation sur Brodie
LF

File:

• LMDZ4/branches/V3_test/libf/phylmd/physiq.F (modified) (6 diffs)

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

@@ -45 +45 @@
 c   CLEFS CPP POUR LES IO
 c   =====================
-#define histhf
-#define histday
-#define histmth
-#define histins
-#define histmthNMC
-#define histISCCP
+c#define histhf
+c#define histday
+C#define histmth
+c#define histins
+c#define histmthNMC
+c#define histISCCP
 c======================================================================
 c    modif   ( P. Le Van ,  12/10/98 )
@@ -531 +531 @@
       save nid_isccp        
 c$OMP THREADPRIVATE(ok_isccp, ecrit_isccp, nid_isccp,nid_isccp)
-#undef histISCCP
-#define histISCCP
 c     data ok_isccp,ecrit_isccp/.true.,0.125/      
 c     data ok_isccp,ecrit_isccp/.true.,1./      
@@ -636 +634 @@
 c  QUESTION : noms de variables ?
 
-#undef histhf
-c#define histhf
 #ifdef histhf
 cIM 130904   data ok_hf,ecrit_hf/.true.,0.25/
@@ -1914 +1910 @@
 #endif
 
-#undef histmthNMC
-#define histmthNMC
 #ifdef histmthNMC
 #include "ini_histmthNMC.h"
 #endif
 
-#include "ini_histday_seri.h"
-
-#include "ini_paramLMDZ_phy.h"
+c#include "ini_histday_seri.h"
+
+c#include "ini_paramLMDZ_phy.h"
 
 #endif
@@ -2889 +2883 @@
 c
       IF (ok_isccp) THEN
-#include "calcul_simulISCCP.h"
+c#include "calcul_simulISCCP.h"
       ENDIF !ok_isccp
 
@@ -3592 +3586 @@
 #endif
 
-#include "write_histday_seri.h"
-
-#include "write_paramLMDZ_phy.h"
+c#include "write_histday_seri.h"
+
+c#include "write_paramLMDZ_phy.h"
 
 #endif