Changeset 989 for trunk/LMDZ.GENERIC/makegcm_gfortran

Timestamp:

Jun 14, 2013, 9:17:44 AM (12 years ago)

Author:

emillour

Message:

Generic GCM:

• Some minor changes so that gcm compiles with gfortran:
  • Added option to compile "long lines" (>132 characters) in makegcm_gfortran
  • Removed use of isnan() in physiq.F90 (it is not a standard function)
  • Avoid possible underflow of psat in watercommon_h.F90
  • Adapted the checks on the *IR and *VI band files to be more strict

EM

File:

• trunk/LMDZ.GENERIC/makegcm_gfortran (modified) (2 diffs)

trunk/LMDZ.GENERIC/makegcm_gfortran

@@ -387 +387 @@
 
            ## for gfortran
-           set optim="-g -finit-real=-inf -finit-integer=-999999 -Wall -fbacktrace -fbounds-check -ffpe-trap=invalid,zero,overflow"
-           set optim90="-g -finit-real=-inf -finit-integer=-999999 -Wall -fbacktrace -fbounds-check -ffpe-trap=invalid,zero,overflow"
-           set optimtru90="-g -finit-real=-inf -finit-integer=-999999 -Wall -fbacktrace -fbounds-check -ffpe-trap=invalid,zero,overflow"
+           set optim="-g3 -Wall -fbounds-check -ffpe-trap=invalid,zero,overflow"
+           set optim90="-g3 -Wall -fbounds-check -ffpe-trap=invalid,zero,overflow"
+           set optimtru90="-g3 -Wall -fbounds-check -ffpe-trap=invalid,zero,overflow"
 
         else 
@@ -653 +653 @@
    set f90=f90
 else if $LINUX then
-   set f77=gfortran
-   set f90=gfortran
+# default for gfortran is that "free format" is up to 132 characters,
+# but we sometimes have more, so move that limit to 264 characters
+   set f77="gfortran -ffree-line-length-264"
+   set f90="gfortran -ffree-line-length-264"
    set opt_link=" -L$LIBOGCM -L$NCDFLIB -lnetcdff -lnetcdf "
 else if $SUN then