[cig-commits] r12637 - seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3
dkomati1 at geodynamics.org
dkomati1 at geodynamics.org
Thu Aug 14 15:15:36 PDT 2008
Author: dkomati1
Date: 2008-08-14 15:15:36 -0700 (Thu, 14 Aug 2008)
New Revision: 12637
Modified:
seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/create_regions_mesh.f90
seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/flags.guess
Log:
fixed the CASE_3D flag for the OCEANS; also improved the compiler options
Modified: seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/create_regions_mesh.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/create_regions_mesh.f90 2008-08-14 21:52:31 UTC (rev 12636)
+++ seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/create_regions_mesh.f90 2008-08-14 22:15:36 UTC (rev 12637)
@@ -1477,7 +1477,7 @@
iglobnum=ibool(ix_oceans,iy_oceans,iz_oceans,ispec_oceans)
! compute local height of oceans
- if(ISOTROPIC_3D_MANTLE) then
+ if(CASE_3D) then
! get coordinates of current point
xval = xstore(ix_oceans,iy_oceans,iz_oceans,ispec_oceans)
Modified: seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/flags.guess
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/flags.guess 2008-08-14 21:52:31 UTC (rev 12636)
+++ seismo/3D/SPECFEM3D_GLOBE/tags/v4.0.3/flags.guess 2008-08-14 22:15:36 UTC (rev 12637)
@@ -26,15 +26,13 @@
# Intel ifort Fortran90 for Linux
#
if test x"$FLAGS_CHECK" = x; then
- FLAGS_CHECK="-O3 -e95 -implicitnone -warn truncated_source -warn argument_checking -warn unused -warn declarations -std95 -check all -align sequence -assume byterecl -i-dynamic -ftrapuv -fpe0 -no-ftz -traceback" # -mcmodel=medium
+ FLAGS_CHECK="-O3 -e03 -implicitnone -warn truncated_source -warn argument_checking -warn unused -warn declarations -std03 -check all -align sequence -assume byterecl -ftrapuv -fpe0 -ftz -traceback" # -mcmodel=medium
fi
if test x"$FLAGS_NO_CHECK" = x; then
# standard options
- FLAGS_NO_CHECK="-O3 -e95 -implicitnone -warn truncated_source -warn argument_checking -warn unused -warn declarations -std95 -check nobounds -align sequence -assume byterecl -i-dynamic" # -mcmodel=medium
- # Pangu at Caltech
- #FLAGS_NO_CHECK = $(IFORT_PROF) -vec_report0 -O2 -static -ip -xP -Wl,--allow-multiple-definition -L $$IFORT_ROOT/lib -limf -lirc
+ FLAGS_NO_CHECK="-O3 -e03 -implicitnone -warn truncated_source -warn argument_checking -warn unused -warn declarations -std03 -check nobounds -align sequence -assume byterecl -fpe3 -ftz" # -mcmodel=medium
# debug with range checking
- #FLAGS_NO_CHECK = -O0 -static -e95 -implicitnone -warn truncated_source -warn argument_checking -warn unused -warn declarations -std95 -check bounds
+ #FLAGS_NO_CHECK = -O0 -static -e03 -implicitnone -warn truncated_source -warn argument_checking -warn unused -warn declarations -std03 -check bounds
fi
#MPI_LIBS = -Vaxlib
;;
@@ -90,27 +88,11 @@
FLAGS_NO_CHECK="-ansi -u -64 -O3 -OPT:Olimit=0 -OPT:roundoff=3 -OPT:IEEE_arithmetic=3 -r10000 -mips4"
fi
;;
- alpha:OSF1)
- ################## Compaq Dec Alpha #################
+ ################## NEC SX ##################
if test x"$MPIFC" = x; then
MPIFC=$FC
- if test x"$MPILIBS" = x; then
- MPILIBS="-lfmpi -lmpi"
- fi
fi
if test x"$FLAGS_CHECK" = x; then
- FLAGS_CHECK="\$(FLAGS_NO_CHECK) -check bounds"
- fi
- if test x"$FLAGS_NO_CHECK" = x; then
- FLAGS_NO_CHECK="-fast -warn truncated_source -warn argument_checking -warn unused -warn declarations -std95 -check nounderflow"
- fi
- ;;
- SX-*:SUPER-UX | ES:ESOS)
- ################## Earth Simulator and NEC SX-5 ##################
- if test x"$MPIFC" = x; then
- MPIFC=$FC
- fi
- if test x"$FLAGS_CHECK" = x; then
FLAGS_CHECK="-C hopt -R2 -Wf\" -L nostdout noinclist mrgmsg noeject -msg b -pvctl loopcnt=14000000 expand=10 fullmsg vecthreshold=20 -s\" -pi auto line=100 exp=swap_all,rank"
fi
if test x"$FLAGS_NO_CHECK" = x; then
More information about the cig-commits
mailing list