Changeset 717 for LMDZ4/branches/V3_test/libf
- Timestamp:
- Oct 6, 2006, 11:49:33 AM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/V3_test/libf/phylmd/physiq.F
r704 r717 45 45 c CLEFS CPP POUR LES IO 46 46 c ===================== 47 #define histhf48 #define histday49 #define histmth50 #define histins51 #define histmthNMC52 #define histISCCP47 c#define histhf 48 c#define histday 49 C#define histmth 50 c#define histins 51 c#define histmthNMC 52 c#define histISCCP 53 53 c====================================================================== 54 54 c modif ( P. Le Van , 12/10/98 ) … … 531 531 save nid_isccp 532 532 c$OMP THREADPRIVATE(ok_isccp, ecrit_isccp, nid_isccp,nid_isccp) 533 #undef histISCCP534 #define histISCCP535 533 c data ok_isccp,ecrit_isccp/.true.,0.125/ 536 534 c data ok_isccp,ecrit_isccp/.true.,1./ … … 636 634 c QUESTION : noms de variables ? 637 635 638 #undef histhf639 c#define histhf640 636 #ifdef histhf 641 637 cIM 130904 data ok_hf,ecrit_hf/.true.,0.25/ … … 1914 1910 #endif 1915 1911 1916 #undef histmthNMC1917 #define histmthNMC1918 1912 #ifdef histmthNMC 1919 1913 #include "ini_histmthNMC.h" 1920 1914 #endif 1921 1915 1922 #include "ini_histday_seri.h"1923 1924 #include "ini_paramLMDZ_phy.h"1916 c#include "ini_histday_seri.h" 1917 1918 c#include "ini_paramLMDZ_phy.h" 1925 1919 1926 1920 #endif … … 2889 2883 c 2890 2884 IF (ok_isccp) THEN 2891 #include "calcul_simulISCCP.h"2885 c#include "calcul_simulISCCP.h" 2892 2886 ENDIF !ok_isccp 2893 2887 … … 3592 3586 #endif 3593 3587 3594 #include "write_histday_seri.h"3595 3596 #include "write_paramLMDZ_phy.h"3588 c#include "write_histday_seri.h" 3589 3590 c#include "write_paramLMDZ_phy.h" 3597 3591 3598 3592 #endif
Note: See TracChangeset
for help on using the changeset viewer.