Changeset 331 for trunk/MESOSCALE/LMD_MM_MARS

Timestamp:

Oct 26, 2011, 7:21:08 PM (13 years ago)

Author:

aslmd

Message:

MESOSCALE: minor changes in scripts following tests on new machines and tests with g95 and gfortran. problems reported in NOTES.txt.

Location:

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2

Files:

• arch/configure.defaults (modified) (1 diff)
• mars_lmd/libf/phymars/inifis.F (modified) (1 diff)
• mars_lmd/makegcm_gnu (modified) (1 diff)

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/arch/configure.defaults

@@ -10718 +10718 @@
 FCOPTIM         =       -O2 # -fast
 FCDEBUG         =       #-g -O0
-FCBASEOPTS      =       -Wno=101,139,155,158 -fno-second-underscore -fendian=big -ffree-form $(FCDEBUG) # -Mlfs
+FCBASEOPTS      =       -Wno=101,139,155,158 -fno-second-underscore -fendian=big -ffree-form -ffree-line-length-huge $(FCDEBUG) # -DF2CSTYLE # -Mlfs
 FCFLAGS         =       $(FCOPTIM) $(FCBASEOPTS)
 ARCHFLAGS       =       -DIWORDSIZE=4 -DDWORDSIZE=8 -DRWORDSIZE=$(RWORDSIZE) -DLWORDSIZE=4 \
                          CONFIGURE_NETCDF_FLAG -DGRIB1 CONFIGURE_GRIB2_FLAG \
-                        -DLIMIT_ARGS -DG95
+                        -DLIMIT_ARGS -DG95 #-DF2CSTYLE -DNONSTANDARD_SYSTEM_SUBR
 # machine-specific flags needed to link in ESMF library (C++ run-time-library, etc.)
 ESMF_LIB_FLAGS  =       

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/mars_lmd/libf/phymars/inifis.F

@@ -529 +529 @@
         dtphys=wdt*wappel_phys
         print*,'Physical timestep (s) ',dtphys
-        ecri_phys=8.e18  !! a dummy low frequency
+        ecri_phys=10 !8.e18  !! a dummy low frequency
         print*,'Physical frequency for writing ',ecri_phys
 c

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/mars_lmd/makegcm_gnu

@@ -178 +178 @@
 #-ffixed-form
 #   
-   set optim="-O3 -funroll-loops -fno-second-underscore"
-   set optim90="-O3 -funroll-loops -fno-second-underscore"
-   set optimtru90="-O3 -funroll-loops -fno-second-underscore"
+##   set optim="-O3 -funroll-loops -fno-second-underscore"
+##   set optim90="-O3 -funroll-loops -fno-second-underscore"
+##   set optimtru90="-O3 -funroll-loops -fno-second-underscore"
+   set optim="-O2 -fno-second-underscore -pedantic -fbounds-check -g"
+   set optim90="-O2 -fno-second-underscore -pedantic -fbounds-check -g"
+   set optimtru90="-O2 -fno-second-underscore -pedantic -fbounds-check -g"
 
 #set optim=" -O2 -fno-second-underscore -fstatic -fzero"