diff --git a/Makefile.Defines b/Makefile.Defines index 1fdf74d45..4bb4e55a8 100644 --- a/Makefile.Defines +++ b/Makefile.Defines @@ -50,14 +50,24 @@ ADVIXE_FLAGS = -g -O2 -qopt-report=5 -vec -shared-intel -ldl -debug inline-debug STRICTREAL = -fp-model=precise -prec-div -prec-sqrt -assume protect-parens SIMDVEC = -simd -xhost -align all -assume contiguous_assumed_shape -vecabi=cmdtarget -fp-model no-except -fma -PAR = -qopenmp -parallel +PAR = -qopenmp -parallel +HEAPARR = -heap-arrays 4194304 +OPTREPORT = -qopt-report=5 +IPRODUCTION = -no-wrap-margin -O3 -qopt-prefetch=0 -sox $(PAR) $(SIMDVEC) #$(HEAPARR) + +#gfortran flags +GDEBUG = -g -Og -fbacktrace -fbounds-check -ffree-line-length-none +GPAR = -fopenmp -ftree-parallelize-loops=4 +GMEM = -fsanitize-address-use-after-scope -fstack-check -fsanitize=bounds-strict -fsanitize=undefined -fsanitize=signed-integer-overflow -fsanitize=object-size -fstack-protector-all +GWARNINGS = -Wall -Warray-bounds -Wimplicit-interface -Wextra -Warray-temporaries +GPRODUCTION = -O3 -ffree-line-length-none $(GPAR) MKL_ROOT = /apps/spack/bell/apps/intel-parallel-studio/cluster.2019.5-intel-19.0.5-4brgqlf/mkl/lib IMKL = -I$(MKLROOT)/include LMKL = -L$(MKLROOT)/lib/intel64 -qopt-matmul -FSTRICTFLAGS = $(ADVIXE_FLAGS) $(STRICTREAL) $(SIMDVEC) $(PAR) -FFLAGS = $(ADVIXE_FLAGS) -fp-model=fast $(SIMDVEC) $(PAR) +FSTRICTFLAGS = $(IPRODUCTION) $(STRICTREAL) +FFLAGS = $(IPRODUCTION) -fp-model=fast FORTRAN = ifort AR = xiar CC = icc diff --git a/src/io/io.f90 b/src/io/io.f90 index 62e77e38b..ebdd68531 100644 --- a/src/io/io.f90 +++ b/src/io/io.f90 @@ -2151,7 +2151,6 @@ module subroutine io_write_frame_system(self, param) errmsg = param%outfile // " not found! You must specify OUT_STAT = NEW, REPLACE, or UNKNOWN" goto 667 end if - call param%nciu%open(param) case('NEW') if (fileExists) then errmsg = param%outfile // " Alread Exists! You must specify OUT_STAT = APPEND, REPLACE, or UNKNOWN"