Running make '-j' 'FFLAGS_DOUBLE=-fdefault-real-8 -fdefault-double-8' 'CFLAGS_DOUBLE=-DDOUBLE_PRECISION' 'LD_MPI=' 'CFLAGS_FFTW3=' 'FFLAGS_FFTW3=' 'LD_FFTW3=' 'CFLAGS_FFTW2=' 'FFLAGS_FFTW2=' 'LD_FFTW2=' 'FC=mpif90' 'F77=mpif77' 'FFLAGS=-O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow' 'LDFLAGS_HELPER=-dynamic' 'OMPFFLAGS=-fopenmp' 'OMPLFLAGS=-lgomp' 'PPFLAGS=-cpp' 'FSTD_95=-std=f95' 'FSTD_2003=-std=f2003' 'MODULE_PREFIX=__' 'MODULE_INFIX=_MOD_' 'MODULE_SUFFIX=' 'CC=mpicc' 'CFLAGS=-DFUNDERSC=1' 'default_to_be' MAKING src/Makefile.inc precision-check: No such file src/.current-precision -- creating new one at ./src/scripts/precision-check line 36. touch src/.build-history echo "@"`hostname` "("`date`")" >> src/.build-history ( cd src && \ echo "===== " make FROM_PARENT=src/ -f Makefile.src code "====="; \ make FROM_PARENT=src/ -f Makefile.src default_to_be \ ) ===== make FROM_PARENT=src/ -f Makefile.src code ===== make[1]: Entering directory '/home/pencil/default/samples/Schwinger/src' Compiler: gfortran GCC version: 13 Makefile.src:2916: GCC version > 9 ==> allowing argument mismatch in mpicomm.f90, noparticles_mpicomm.f90, syscalls.f90 and fftpack.f90. scripts/mkcparam -b noascalar.f90 noborder_profiles.f90 nochemistry.f90 nochiral.f90 nocosmicray.f90 nocosmicrayflux.f90 nodensity.f90 deriv.f90 nodetonate.f90 nodustdensity.f90 nodustvelocity.f90 noentropy.f90 noeos.f90 nofixed_point.f90 noforcing.f90 nogravity.f90 nogpu.f90 grid.f90 noheatflux.f90 nohydro.f90 nohyperresi_strict.f90 nohypervisc_strict.f90 noimplicit_diffusion.f90 noimplicit_physics.f90 noinitial_condition.f90 nointerstellar.f90 nolorenz_gauge.f90 magnetic.f90 magnetic/nomeanfield.f90 magnetic/nomeanfield_demfdt.f90 mpicomm.f90 noneutraldensity.f90 noneutralvelocity.f90 noNSCBC.f90 noopacity.f90 noparticles.f90 noparticles_adaptation.f90 noparticles_coagulation.f90 noparticles_condensation.f90 noparticles_collisions.f90 noparticles_map.f90 noparticles_density.f90 noparticles_mass.f90 noparticles_number.f90 noparticles_radius.f90 noparticles_potential.f90 noparticles_grad.f90 noparticles_selfgravity.f90 noparticles_sink.f90 noparticles_drag.f90 noparticles_spin.f90 noparticles_stalker.f90 noparticles_lyapunov.f90 noparticles_caustics.f90 noparticles_tetrad.f90 noparticles_stirring.f90 noparticles_diagnos_dv.f90 noparticles_diagnos_state.f90 noparticles_persistence.f90 noparticles_temperature.f90 noparticles_adsorbed.f90 noparticles_surfspec.f90 noparticles_chemistry.f90 nopointmasses.f90 nopoisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 nopscalar.f90 noradiation.f90 noselfgravity.f90 noSGS_hydro.f90 noshear.f90 noshock.f90 nosignal_handling.f90 nosolid_cells.f90 nostreamlines.f90 notestfield.f90 notestflow.f90 notestscalar.f90 notimeavg.f90 notraining.f90 noviscosity.f90 cparam.local special/backreact_infl.f90 special/disp_current.f90 scripts/mkcparam -b noascalar.f90 noborder_profiles.f90 nochemistry.f90 nochiral.f90 nocosmicray.f90 nocosmicrayflux.f90 nodensity.f90 deriv.f90 nodetonate.f90 nodustdensity.f90 nodustvelocity.f90 noentropy.f90 noeos.f90 nofixed_point.f90 noforcing.f90 nogravity.f90 nogpu.f90 grid.f90 noheatflux.f90 nohydro.f90 nohyperresi_strict.f90 nohypervisc_strict.f90 noimplicit_diffusion.f90 noimplicit_physics.f90 noinitial_condition.f90 nointerstellar.f90 nolorenz_gauge.f90 magnetic.f90 magnetic/nomeanfield.f90 magnetic/nomeanfield_demfdt.f90 mpicomm.f90 noneutraldensity.f90 noneutralvelocity.f90 noNSCBC.f90 noopacity.f90 noparticles.f90 noparticles_adaptation.f90 noparticles_coagulation.f90 noparticles_condensation.f90 noparticles_collisions.f90 noparticles_map.f90 noparticles_density.f90 noparticles_mass.f90 noparticles_number.f90 noparticles_radius.f90 noparticles_potential.f90 noparticles_grad.f90 noparticles_selfgravity.f90 noparticles_sink.f90 noparticles_drag.f90 noparticles_spin.f90 noparticles_stalker.f90 noparticles_lyapunov.f90 noparticles_caustics.f90 noparticles_tetrad.f90 noparticles_stirring.f90 noparticles_diagnos_dv.f90 noparticles_diagnos_state.f90 noparticles_persistence.f90 noparticles_temperature.f90 noparticles_adsorbed.f90 noparticles_surfspec.f90 noparticles_chemistry.f90 nopointmasses.f90 nopoisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 nopscalar.f90 noradiation.f90 noselfgravity.f90 noSGS_hydro.f90 noshear.f90 noshock.f90 nosignal_handling.f90 nosolid_cells.f90 nostreamlines.f90 notestfield.f90 notestflow.f90 notestscalar.f90 notimeavg.f90 notraining.f90 noviscosity.f90 cparam.local special/backreact_infl.f90 special/disp_current.f90 mpicc -DFUNDERSC=1 -DDOUBLE_PRECISION -o syscalls_ansi.o -c syscalls_ansi.c mpicc -DFUNDERSC=1 -DDOUBLE_PRECISION -o morton_helper.o -c morton_helper.c scripts/mkdummyinc -d file_io_common.f90 -s file_io_f95.f90 -o file_io_common.inc scripts/mkdummyinc -d noeos.f90 -s noeos.f90 -o eos_dummies.inc mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -fallow-argument-mismatch -o fftpack.o -c fftpack.f90 special/backreact_infl_dummies.inc morton_helper.c:1:9: warning: #pragma once in main file 1 | #pragma once | ^~~~ special/disp_current_dummies.inc fftpack.f90:7002:68: 7002 | call rffti1 ( n, wsave(n+1), wsave(2*n+1) ) !writes wsave(n+1:) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:6806:58: 6806 | call rfftf1 ( n, r, wsave(1), wsave(n+1), wsave(2*n+1) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:6579:58: 6579 | call rfftb1 ( n, r, wsave(1), wsave(n+1), wsave(2*n+1) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:2443:45: 2443 | call dffti1 ( n, wsave(n+1), wsave(2*n+1) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:2247:58: 2247 | call dfftf1 ( n, r, wsave(1), wsave(n+1), wsave(2*n+1) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:368:60: 368 | call cfftf1 ( n, c, wsave(1), wsave(2*n+1), wsave(4*n+1) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed REAL(8) to COMPLEX(8) fftpack.f90:368:60: 368 | call cfftf1 ( n, c, wsave(1), wsave(2*n+1), wsave(4*n+1) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:445:66: 445 | call passf4 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:445:66: 445 | call passf4 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:447:66: 447 | call passf4 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:447:66: 447 | call passf4 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:455:48: 455 | call passf2 ( 2*ido, l1, c, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:455:48: 455 | call passf2 ( 2*ido, l1, c, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:457:48: 457 | call passf2 ( 2*ido, l1, ch, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:457:48: 457 | call passf2 ( 2*ido, l1, ch, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:467:57: 467 | call passf3 ( 2*ido, l1, c, ch, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:467:57: 467 | call passf3 ( 2*ido, l1, c, ch, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:469:57: 469 | call passf3 ( 2*ido, l1, ch, c, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:469:57: 469 | call passf3 ( 2*ido, l1, ch, c, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:481:75: 481 | call passf5 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:481:75: 481 | call passf5 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:483:75: 483 | call passf5 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:483:75: 483 | call passf5 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:491:72: 491 | call passf ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:491:72: 491 | call passf ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c1’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:491:72: 491 | call passf ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:491:72: 491 | call passf ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:491:72: 491 | call passf ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:493:73: 493 | call passf ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:493:73: 493 | call passf ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c1’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:493:73: 493 | call passf ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:493:73: 493 | call passf ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:493:73: 493 | call passf ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:75:60: 75 | call cfftb1 ( n, c, wsave(1), wsave(2*n+1), wsave(4*n+1) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed REAL(8) to COMPLEX(8) fftpack.f90:75:60: 75 | call cfftb1 ( n, c, wsave(1), wsave(2*n+1), wsave(4*n+1) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:153:66: 153 | call passb4 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:153:66: 153 | call passb4 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:155:66: 155 | call passb4 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:155:66: 155 | call passb4 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:163:48: 163 | call passb2 ( 2*ido, l1, c, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:163:48: 163 | call passb2 ( 2*ido, l1, c, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:165:48: 165 | call passb2 ( 2*ido, l1, ch, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:165:48: 165 | call passb2 ( 2*ido, l1, ch, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:175:57: 175 | call passb3 ( 2*ido, l1, c, ch, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:175:57: 175 | call passb3 ( 2*ido, l1, c, ch, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:177:57: 177 | call passb3 ( 2*ido, l1, ch, c, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:177:57: 177 | call passb3 ( 2*ido, l1, ch, c, wa(iw), wa(ix2) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:189:75: 189 | call passb5 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:189:75: 189 | call passb5 ( 2*ido, l1, c, ch, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:191:75: 191 | call passb5 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:191:75: 191 | call passb5 ( 2*ido, l1, ch, c, wa(iw), wa(ix2), wa(ix3), wa(ix4) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:199:72: 199 | call passb ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:199:72: 199 | call passb ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c1’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:199:72: 199 | call passb ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:199:72: 199 | call passb ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:199:72: 199 | call passb ( nac, 2*ido, ip, l1, idl1, c, c, c, ch, ch, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:201:73: 201 | call passb ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:201:73: 201 | call passb ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c1’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:201:73: 201 | call passb ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘c2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:201:73: 201 | call passb ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:201:73: 201 | call passb ( nac, 2*ido, ip, l1, idl1, ch, ch, ch, c, c, wa(iw) ) | 1 Warning: Type mismatch in argument ‘ch2’ at (1); passed COMPLEX(8) to REAL(8) fftpack.f90:644:70: 644 | call cffti1 ( n, wsave(2*n+1), wsave(4*n+1) ) !writes wsave(2n+1:) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:2678:68: 2678 | call dsint1 ( n, x, wsave(1), wsave(iw1), wsave(iw2), wsave(iw3) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:3354:48: 3354 | call ezffti1 ( n, wsave(2*n+1), wsave(3*n+1) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) fftpack.f90:8150:68: 8150 | call rsint1 ( n, x, wsave(1), wsave(iw1), wsave(iw2), wsave(iw3) ) | 1 Warning: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4) ### ¡¡¡WARNING!!! ###: el multiply declared: in magnetic.f90 special/disp_current.f90 ### ¡¡¡WARNING!!! ###: e2 multiply declared: in magnetic.f90 special/disp_current.f90 ### ¡¡¡WARNING!!! ###: e2 multiply declared: in magnetic.f90 special/disp_current.f90 ### ¡¡¡WARNING!!! ###: el multiply declared: in magnetic.f90 special/disp_current.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o cparam.o -c cparam.f90 cparam.f90:77:39: 77 | integer, parameter :: nrcylrun=max(nx/20,1) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] cparam.f90:140:47: 140 | integer, parameter :: impossible_int=-max_int/100 | 1 Warning: Integer division truncated to constant ‘21474836’ at (1) [-Winteger-division] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o cdata.o -c cdata.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -c geometrical_types.f90 -o geometrical_types.o geometrical_types.f90:111:60: 111 | subroutine torus_rect_unfmt_read(torus,unit,iostat,iomsg) | 1 Warning: Unused dummy argument ‘iomsg’ at (1) [-Wunused-dummy-argument] geometrical_types.f90:100:61: 100 | subroutine torus_rect_unfmt_write(torus,unit,iostat,iomsg) | 1 Warning: Unused dummy argument ‘iomsg’ at (1) [-Wunused-dummy-argument] cdata.f90:594:53: 594 | integer :: lpoint=(mx+1)/2,mpoint=(my+1)/2,npoint=(mz+1)/2 | 1 Warning: Integer division truncated to constant ‘11’ at (1) [-Winteger-division] cdata.f90:595:56: 595 | integer :: lpoint2=(mx+1)/4,mpoint2=(my+1)/4,npoint2=(mz+1)/4 | 1 Warning: Integer division truncated to constant ‘5’ at (1) [-Winteger-division] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -fallow-argument-mismatch -o syscalls.o -c syscalls.f90 syscalls.f90:463:21: 463 | call copy_addr_c(var,caddr) | 1 ...... 472 | call copy_addr_c(var,caddr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/TYPE(torus_rect)). syscalls.f90:476:34: 476 | subroutine get_char_arr(strarr,strlen,arrlen) | 1 Warning: Unused dummy argument ‘strarr’ at (1) [-Wunused-dummy-argument] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o particles_cdata.o -c particles_cdata.f90 particles_cdata.f90:22:54: 22 | integer, parameter :: max_par_per_grid=int(npar_maxp/nwgrid)+1 ! ceiling needed? | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -o general.o -c general.f90 general.f90:5828:4: 5828 | elemental logical function isnan(x) | 1 Warning: ‘isnan’ declared at (1) may shadow the intrinsic of the same name. In order to call the intrinsic, explicit INTRINSIC declarations may be required. [-Wintrinsic-shadow] general.f90:6863:35: 6863 | type(two_dim_array_dims) :: dim | 1 Warning: Unused variable ‘dim’ declared at (1) [-Wunused-variable] general.f90:6846:38: 6846 | type(single_dim_array_dims) :: dim | 1 Warning: Unused variable ‘dim’ declared at (1) [-Wunused-variable] general.f90:6479:10: 6479 | use Cdata, only: iproc | 1 Warning: Unused module variable ‘iproc’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5498:10: 5498 | use Cdata, only: iproc, iproc_world | 1 Warning: Unused module variable ‘lroot’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5498:10: 5498 | use Cdata, only: iproc, iproc_world | 1 Warning: Unused module variable ‘lyang’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5435:10: 5435 | use Cdata, only: y, z | 1 Warning: Unused module variable ‘y’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5435:10: 5435 | use Cdata, only: y, z | 1 Warning: Unused module variable ‘z’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5364:10: 5364 | use Cdata, only: costh,sinth,cosph,sinph, y, z | 1 Warning: Unused module variable ‘y’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5364:10: 5364 | use Cdata, only: costh,sinth,cosph,sinph, y, z | 1 Warning: Unused module variable ‘z’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:4771:36: 4771 | function rangegen(start,end,step) | 1 Warning: Unused dummy argument ‘step’ at (1) [-Wunused-dummy-argument] general.f90:476:10: 476 | use Cdata, only: lprocz_slowest, nprocx_node, nprocy_node, nprocz_node | 1 Warning: Unused module variable ‘lprocz_slowest’ which has been explicitly imported at (1) [-Wunused-variable] general.h:71:68: 71 | subroutine get_scattered_array(ivar,layer,src,dest,timediff,ahead) | 1 Warning: Unused dummy argument ‘ahead’ at (1) [-Wunused-dummy-argument] general.h:71:53: 71 | subroutine get_scattered_array(ivar,layer,src,dest,timediff,ahead) | 1 Warning: Unused dummy argument ‘dest’ at (1) [-Wunused-dummy-argument] general.h:71:38: 71 | subroutine get_scattered_array(ivar,layer,src,dest,timediff,ahead) | 1 Warning: Unused dummy argument ‘ivar’ at (1) [-Wunused-dummy-argument] general.h:71:44: 71 | subroutine get_scattered_array(ivar,layer,src,dest,timediff,ahead) | 1 Warning: Unused dummy argument ‘layer’ at (1) [-Wunused-dummy-argument] general.h:73:9: 73 | use Cdata, only:ldiagnos | 1 Warning: Unused module variable ‘ldiagnos’ which has been explicitly imported at (1) [-Wunused-variable] general.h:71:48: 71 | subroutine get_scattered_array(ivar,layer,src,dest,timediff,ahead) | 1 Warning: Unused dummy argument ‘src’ at (1) [-Wunused-dummy-argument] general.h:71:62: 71 | subroutine get_scattered_array(ivar,layer,src,dest,timediff,ahead) | 1 Warning: Unused dummy argument ‘timediff’ at (1) [-Wunused-dummy-argument] general.h:59:55: 59 | subroutine store_scattered_array(ind3,layer,src,dest,time) | 1 Warning: Unused dummy argument ‘dest’ at (1) [-Wunused-dummy-argument] general.h:59:40: 59 | subroutine store_scattered_array(ind3,layer,src,dest,time) | 1 Warning: Unused dummy argument ‘ind3’ at (1) [-Wunused-dummy-argument] general.h:59:46: 59 | subroutine store_scattered_array(ind3,layer,src,dest,time) | 1 Warning: Unused dummy argument ‘layer’ at (1) [-Wunused-dummy-argument] general.h:59:50: 59 | subroutine store_scattered_array(ind3,layer,src,dest,time) | 1 Warning: Unused dummy argument ‘src’ at (1) [-Wunused-dummy-argument] general.h:59:60: 59 | subroutine store_scattered_array(ind3,layer,src,dest,time) | 1 Warning: Unused dummy argument ‘time’ at (1) [-Wunused-dummy-argument] general.f90:2064:28: 2064 | subroutine tridag_double(a,b,c,r,u,err) | ^ Warning: ‘tridag_double’ defined but not used [-Wunused-function] general.f90:5184:4: 5184 | function detect_precision_of_binary(file,reclen) result(prec) | ^ Warning: ‘detect_precision_of_binary’ defined but not used [-Wunused-function] general.f90:6126:25: 6126 | subroutine newton_arr(x,func,add,fmax,dxmax,itmax) | ^ Warning: ‘newton_arr’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o noyinyang.o -c noyinyang.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -fallow-argument-mismatch -o mpicomm.o -c mpicomm.f90 mpicomm.f90:863:39: 863 | if (lfirst_proc_y.and.ipz>=nprocz/3.and.ipz<2*nprocz/3.) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:869:38: 869 | if (llast_proc_y.and.ipz>=nprocz/3.and.ipz<2*nprocz/3.) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:880:56: 880 | if (lfirst_proc_z.or.lfirst_proc_y.and.ipz>=nprocz/3.and.ipz<2*nprocz/3.) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:886:55: 886 | if (lfirst_proc_z.or.llast_proc_y.and.ipz>=nprocz/3.and.ipz<2*nprocz/3.) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:892:54: 892 | if (llast_proc_z.or.llast_proc_y.and.ipz>=nprocz/3.and.ipz<2*nprocz/3.) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:898:55: 898 | if (llast_proc_z.or.lfirst_proc_y.and.ipz>=nprocz/3.and.ipz<2*nprocz/3.) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1180:38: 1180 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] mpicomm.f90:1269:38: 1269 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] mpicomm.f90:10407:46: 10407 | integer, parameter :: nprocz_rd=nprocz/3 | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:3455:11: 3455 | mult=len_array/max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:3456:11: 3456 | res =len_array-mult*max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:3481:11: 3481 | mult=len_array/max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:3482:11: 3482 | res =len_array-mult*max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:10809:26: 10809 | call MPI_SCATTERV(src,counts,dspls,mpi_precision,dest,nlocal,mpi_precision,root,MPI_COMM_PENCIL,mpierr) | 1 ...... 10838 | call MPI_SCATTERV(src,counts,dspls,MPI_INTEGER,dest,nlocal,MPI_INTEGER,root,MPI_COMM_PENCIL,mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/INTEGER(4)). mpicomm.f90:10809:57: 10809 | call MPI_SCATTERV(src,counts,dspls,mpi_precision,dest,nlocal,mpi_precision,root,MPI_COMM_PENCIL,mpierr) | 1 ...... 10838 | call MPI_SCATTERV(src,counts,dspls,MPI_INTEGER,dest,nlocal,MPI_INTEGER,root,MPI_COMM_PENCIL,mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/INTEGER(4)). mpicomm.f90:10355:22: 10355 | call MPI_GATHER(flag, 1, MPI_LOGICAL, flags, 1, MPI_LOGICAL, root, MPI_COMM_PENCIL, mpierr) | 1 ...... 10823 | call MPI_GATHER(nlocal,1,MPI_INTEGER,counts,1,MPI_INTEGER,root,MPI_COMM_PENCIL,mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (LOGICAL(4)/INTEGER(4)). mpicomm.f90:10355:44: 10355 | call MPI_GATHER(flag, 1, MPI_LOGICAL, flags, 1, MPI_LOGICAL, root, MPI_COMM_PENCIL, mpierr) | 1 ...... 10823 | call MPI_GATHER(nlocal,1,MPI_INTEGER,counts,1,MPI_INTEGER,root,MPI_COMM_PENCIL,mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (LOGICAL(4)/INTEGER(4)). mpicomm.f90:10198:46: 10195 | call MPI_RECV(rowbuf_cmplx, nsend, MPI_CMPLX, ig, tag, ioptest(comm,MPI_COMM_GRID), status, mpierr) | 2 ...... 10198 | call MPI_RECV(rowbuf, nsend, mpi_precision, ig, tag, ioptest(comm,MPI_COMM_GRID), status, mpierr) | 1 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/COMPLEX(8)). mpicomm.f90:10218:46: 10210 | call MPI_SEND(sendbuf_cmplx(iy,ixa:ixe:ixs,iz,ic), & | 2 ...... 10218 | call MPI_SEND(sendbuf(iy,ixa:ixe:ixs,iz), & | 1 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/COMPLEX(8)). mpicomm.f90:5256:24: 5256 | call MPI_REDUCE(fland_tmp, fland, nreduce, MPI_LOGICAL, MPI_LAND, root,& | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (LOGICAL(4)/REAL(8)). mpicomm.f90:5256:35: 5256 | call MPI_REDUCE(fland_tmp, fland, nreduce, MPI_LOGICAL, MPI_LAND, root,& | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (LOGICAL(4)/REAL(8)). mpicomm.f90:5046:24: 5046 | call MPI_REDUCE(fsum_tmp, fsum, 1, mpi_precision, MPI_SUM, root, & | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:5046:34: 5046 | call MPI_REDUCE(fsum_tmp, fsum, 1, mpi_precision, MPI_SUM, root, & | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:4911:22: 4911 | call MPI_REDUCE(fmin_tmp, fmin, 1, mpi_precision, MPI_MIN, root, & | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:4911:32: 4911 | call MPI_REDUCE(fmin_tmp, fmin, 1, mpi_precision, MPI_MIN, root, & | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:4857:22: 4857 | call MPI_REDUCE(fmax_tmp, fmax, 1, mpi_precision, MPI_MAX, root, & | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:4857:32: 4857 | call MPI_REDUCE(fmax_tmp, fmax, 1, mpi_precision, MPI_MAX, root, & | 1 ...... 10299 | call MPI_REDUCE(vector, recvbuf, nk, mpi_precision, merge, root, mpiprocs, mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:4846:25: 4846 | call MPI_ALLREDUCE(MPI_IN_PLACE, lor, n, MPI_LOGICAL, MPI_LOR, ioptest(comm,MPI_COMM_GRID), mpierr) | 1 ...... 5514 | call MPI_ALLREDUCE(lemergency_brake,global_stop_flag,1,MPI_LOGICAL, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/LOGICAL(4)). mpicomm.f90:4846:39: 4846 | call MPI_ALLREDUCE(MPI_IN_PLACE, lor, n, MPI_LOGICAL, MPI_LOR, ioptest(comm,MPI_COMM_GRID), mpierr) | 1 ...... 5514 | call MPI_ALLREDUCE(lemergency_brake,global_stop_flag,1,MPI_LOGICAL, & | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1) mpicomm.f90:4793:35: 4793 | call MPI_ALLREDUCE(fmax_tmp, fmax, nreduce, mpi_precision, MPI_MAX, & | 1 ...... 5514 | call MPI_ALLREDUCE(lemergency_brake,global_stop_flag,1,MPI_LOGICAL, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/LOGICAL(4)). mpicomm.f90:4396:21: 4396 | call MPI_BCAST(bcast_array,nbcast_array,MPI_COMPLEX,ibcast_proc, & | 1 ...... 10392 | call MPI_BCAST(report_clean_output,1,MPI_LOGICAL,root,MPI_COMM_PENCIL,mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (COMPLEX(4)/LOGICAL(4)). mpicomm.f90:4116:21: 4116 | call MPI_BCAST(lbcast_array, product(nbcast_array), MPI_LOGICAL, ioptest(proc,root), & | 1 ...... 10392 | call MPI_BCAST(report_clean_output,1,MPI_LOGICAL,root,MPI_COMM_PENCIL,mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-2) mpicomm.f90:4099:21: 4099 | call MPI_BCAST(lbcast_array,nbcast_array,MPI_LOGICAL,ioptest(proc,root), & | 1 ...... 10392 | call MPI_BCAST(report_clean_output,1,MPI_LOGICAL,root,MPI_COMM_PENCIL,mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1) mpicomm.f90:4050:23: 4050 | call MPI_ISEND(bcast_array, nbcast_array, MPI_INTEGER, proc_rec, & | 1 ...... 6446 | call MPI_ISEND(lbufo,nbuf,mpi_precision, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(8)). mpicomm.f90:3791:21: 3791 | call MPI_IRECV(bcast_array, nbcast_array, MPI_INTEGER, proc_src, & | 1 ...... 6441 | call MPI_IRECV(ubufi,nbuf,mpi_precision, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(8)). mpicomm.f90:3791:34: 3791 | call MPI_IRECV(bcast_array, nbcast_array, MPI_INTEGER, proc_src, & | 1 ...... 6441 | call MPI_IRECV(ubufi,nbuf,mpi_precision, & | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1) mpicomm.f90:3646:24: 3646 | call MPI_SENDRECV(send_array,1,mpi_precision,proc_dest,sendtag, & | 1 ...... 3725 | call MPI_SENDRECV(send_array,num_elements,mpi_precision,proc_dest,sendtag, & | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:3647:24: 3647 | recv_array,1,mpi_precision,proc_src,recvtag, & | 1 ...... 3726 | recv_array,num_elements,mpi_precision,proc_src,recvtag, & | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:3631:24: 3631 | call MPI_SENDRECV(send_array,sendcnt,MPI_INTEGER,proc_dest,sendtag, & | 1 ...... 3725 | call MPI_SENDRECV(send_array,num_elements,mpi_precision,proc_dest,sendtag, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(8)). mpicomm.f90:3632:24: 3632 | recv_array,sendcnt,MPI_INTEGER,proc_src,recvtag, & | 1 ...... 3726 | recv_array,num_elements,mpi_precision,proc_src,recvtag, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(8)). mpicomm.f90:3126:23: 3126 | call MPI_IRECV(bcast_array, 1, mpi_precision, proc_src, & | 1 ...... 6441 | call MPI_IRECV(ubufi,nbuf,mpi_precision, & | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) mpicomm.f90:3127:59: 3127 | tag_id, ioptest(comm,MPI_COMM_GRID), stat, nonblock, mpierr) | 1 ...... 6442 | zuneigh,tolowz,ioptest(comm,MPI_COMM_GRID),irecv_rq_fromuppz,mpierr) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-1) mpicomm.f90:3127:82: 3127 | tag_id, ioptest(comm,MPI_COMM_GRID), stat, nonblock, mpierr) | 1 Warning: More actual than formal arguments in procedure call at (1) mpicomm.f90:745:31: 743 | call MPI_Win_create(a, size, 1, MPI_INFO_NULL, MPI_COMM_WORLD, win, mpierr) | 2 744 | else ! hence other ranks do not declare a window 745 | call MPI_Win_create(a, 0, 1, MPI_INFO_NULL, MPI_COMM_WORLD, win, mpierr) | 1 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/INTEGER(8)). mpicomm.f90:554:41: 554 | call MPI_COMM_SPLIT(MPI_COMM_GRID, ipy+nprocy*ipz, ipx, & | 1 ...... 11593 | call MPI_COMM_SPLIT(MPI_COMM_PENCIL, lwrite_slice_r, iproc, MPI_COMM_RSLICE, mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/LOGICAL(4)). mpicomm.f90:254:38: 254 | call MPI_TYPE_SIZE(MPI_INTEGER, size_of_int, mpierr) | 1 ...... 4468 | call MPI_TYPE_SIZE(mpi_precision, sizeofreal, mpierr) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(8)/INTEGER(4)). mpicomm.f90:147:27: 147 | integer :: MIDZ=MID, MIDC=MID | 1 Warning: Unused PRIVATE module variable ‘midc’ declared at (1) [-Wunused-value] mpicomm.f90:10861:25: 10861 | integer :: ind,j,ll,name_len,nxgrid_foreign,nygrid_foreign,il1,il2,im1,im2,lenx,leny,px,py,tag,peer | 1 Warning: Unused variable ‘ll’ declared at (1) [-Wunused-variable] mpicomm.f90:10861:100: 10861 | integer :: ind,j,ll,name_len,nxgrid_foreign,nygrid_foreign,il1,il2,im1,im2,lenx,leny,px,py,tag,peer | 1 Warning: Unused variable ‘tag’ declared at (1) [-Wunused-variable] mpicomm.f90:7449:49: 7449 | integer, dimension(MPI_STATUS_SIZE) :: stat | 1 Warning: Unused variable ‘stat’ declared at (1) [-Wunused-variable] mpicomm.f90:7332:49: 7332 | integer, dimension(MPI_STATUS_SIZE) :: stat | 1 Warning: Unused variable ‘stat’ declared at (1) [-Wunused-variable] mpicomm.f90:6614:45: 6614 | subroutine distribute_yz_3D(out, in, comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:5522:33: 5522 | subroutine transp(a,var, comm, lsync) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:4528:68: 4528 | subroutine mpiallreduce_sum_arr2(fsum_tmp,fsum,nreduce,idir,comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:4503:67: 4503 | subroutine mpiallreduce_sum_arr(fsum_tmp,fsum,nreduce,idir,comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:2667:49: 2667 | real, dimension (nghost,4*ny,mz,mcom) :: fa, fb | 1 Warning: Array ‘fa’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] mpicomm.f90:2667:53: 2667 | real, dimension (nghost,4*ny,mz,mcom) :: fa, fb | 1 Warning: Array ‘fb’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] mpicomm.f90:2396:38: 2396 | integer :: ivar1, ivar2, nbuf, j, ny_loc, nx_loc, nvar_loc | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:2341:38: 2341 | integer :: ivar1, ivar2, nbuf, j, nx_loc, nz_loc, nvar_loc | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:1496:80: 1496 | integer :: ivar1, ivar2, nbufy, nbufz, nbufyz, mxl, comm, bufact, dir,mm,j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:677:57: 677 | gridbuf_left, & ! ~ of left corner neighbour | 1 Warning: Unused variable ‘gridbuf_left’ declared at (1) [-Wunused-variable] mpicomm.f90:676:57: 676 | real, dimension(:,:,:), allocatable :: gridbuf_midy, gridbuf_midz, & ! contains grid request of direct neighbour(s) | 1 Warning: Unused variable ‘gridbuf_midy’ declared at (1) [-Wunused-variable] mpicomm.f90:676:71: 676 | real, dimension(:,:,:), allocatable :: gridbuf_midy, gridbuf_midz, & ! contains grid request of direct neighbour(s) | 1 Warning: Unused variable ‘gridbuf_midz’ declared at (1) [-Wunused-variable] mpicomm.f90:678:58: 678 | gridbuf_right ! ~ of right corner neighbour | 1 Warning: Unused variable ‘gridbuf_right’ declared at (1) [-Wunused-variable] mpicomm.f90:670:41: 670 | subroutine set_cubed_sphere_neighbors | ^ Warning: ‘set_cubed_sphere_neighbors’ defined but not used [-Wunused-function] mpicomm.f90:3212:33: 3212 | subroutine mpirecv_cmplx_arr3(bcast_array,nbcast_array,proc_src,tag_id,comm,nonblock) | ^ Warning: ‘mpirecv_cmplx_arr3’ defined but not used [-Wunused-function] mpicomm.f90:3422:39: 3422 | subroutine mpisend_real_arr_assumed(bcast_array,nbcast_array,offset,proc_rec,tag_id,comm) | ^ Warning: ‘mpisend_real_arr_assumed’ defined but not used [-Wunused-function] mpicomm.f90:3492:39: 3492 | subroutine mpirecv_real_arr_assumed(bcast_array,nbcast_array,offset,proc_rec,tag_id,comm) | ^ Warning: ‘mpirecv_real_arr_assumed’ defined but not used [-Wunused-function] mpicomm.f90:3557:33: 3557 | subroutine mpisend_cmplx_arr3(bcast_array,nbcast_array,proc_rec,tag_id,comm,nonblock) | ^ Warning: ‘mpisend_cmplx_arr3’ defined but not used [-Wunused-function] mpicomm.f90:9774:30: 9774 | subroutine distribute_grid(x, y, z, gx, gy, gz) | ^ Warning: ‘distribute_grid’ defined but not used [-Wunused-function] mpicomm.f90:9934:24: 9934 | subroutine mpigather( sendbuf, recvbuf , comm) | ^ Warning: ‘mpigather’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o messages.o -c messages.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o deriv.o -c deriv.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -o file_io_f95.o -c file_io_f95.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -o slices_methods.o -c slices_methods.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o noyinyang_mpi.o -c noyinyang_mpi.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o shared_variables.o -c shared_variables.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o debug_io_dist.o -c debug_io_dist.f90 shared_variables.f90:266:38: 266 | subroutine get_variable_real0d_alt(varname,variable,ierr) | ^ Warning: ‘get_variable_real0d_alt’ defined but not used [-Wunused-function] file_io_common.inc:352:38: 352 | if (name /= '') type = '_'//type | 1 Warning: CHARACTER expression will be truncated in assignment (5/6) at (1) [-Wcharacter-truncation] file_io_common.inc:39:12: 39 | len = rec_len | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] file_io_common.inc:40:12: 40 | num = num_rec | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] file_io_common.inc:245:48: 245 | function list_files(name,options,only_number) result (num) | 1 Warning: Unused dummy argument ‘only_number’ at (1) [-Wunused-dummy-argument] file_io_f95.f90:184:36: 184 | subroutine write_binary_file_str(file,bytes,buffer) | ^ Warning: ‘write_binary_file_str’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o nohdf5_io.o -c nohdf5_io.f90 nohdf5_io.f90:242:37: 242 | subroutine output_hdf5_torus_rect(name, data) | ^ Warning: ‘output_hdf5_torus_rect’ defined but not used [-Wunused-function] nohdf5_io.f90:566:35: 566 | subroutine input_slice_position(directory,ix_bc_,iy_bc_,iy2_bc_,iz_bc_,iz2_bc_,iz3_bc_,iz4_bc_) | ^ Warning: ‘input_slice_position’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o farray.o -c farray.f90 farray.f90:538:21: 538 | do i=1,mscratch | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] farray.f90:987:55: 987 | function farray_index_by_name_ode(varname,component) result(indx) | 1 Warning: Dummy argument ‘component’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -o io_dist.o -c io_dist.f90 io_common.inc:197:2: 197 | //trim(file)//": "//trim(rtoa(t_in))//"/="//trim(rtoa(real(t)))) | 1 Warning: Nonconforming tab character at (1) [-Wtabs] io_dist.f90:167:19: 167 | out_size=nw*bytes | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] io_dist.f90:1114:48: 1114 | subroutine output_globals(file, a, nv, label) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1098:50: 1098 | logical function read_persist_torus_rect(label,value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1067:47: 1067 | logical function read_persist_real_1D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1038:47: 1038 | logical function read_persist_real_0D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1024:46: 1024 | logical function read_persist_int_1D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1010:46: 1010 | logical function read_persist_int_0D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:996:50: 996 | logical function read_persist_logical_1D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:982:50: 982 | logical function read_persist_logical_0D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:935:41: 935 | logical function persist_exists(label) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:877:43: 877 | subroutine input_pointmass(file, labels, fq, mv, nc) | 1 Warning: Unused dummy argument ‘labels’ at (1) [-Wunused-dummy-argument] io_dist.f90:838:72: 838 | subroutine input_part_snap(ipar, ap, mv, nv, npar_total, file, label) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:646:62: 646 | logical function write_persist_torus_rect(label, id, value) | 1 Warning: Unused dummy argument ‘value’ at (1) [-Wunused-dummy-argument] io_dist.f90:514:43: 514 | logical function write_persist_id(label, id) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:459:44: 459 | subroutine output_pointmass(file, labels, fq, mv, nc) | 1 Warning: Unused dummy argument ‘labels’ at (1) [-Wunused-dummy-argument] io_dist.f90:420:38: 420 | character (len=fnlen) :: dataset | 1 Warning: Unused variable ‘dataset’ declared at (1) [-Wunused-variable] io_dist.f90:406:35: 406 | subroutine output_stalker(label, mv, nv, data, nvar, lfinalize) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:384:48: 384 | subroutine output_stalker_init(num, nv, snap, ID) | 1 Warning: Unused dummy argument ‘snap’ at (1) [-Wunused-dummy-argument] io_dist.f90:305:61: 305 | subroutine output_part_snap(ipar, ap, mv, nv, file, label, ltruncate) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:305:72: 305 | subroutine output_part_snap(ipar, ap, mv, nv, file, label, ltruncate) | 1 Warning: Unused dummy argument ‘ltruncate’ at (1) [-Wunused-dummy-argument] io_dist.f90:129:29: 129 | character (len=6) :: ch | 1 Warning: Unused variable ‘ch’ declared at (1) [-Wunused-variable] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o sub.o -c sub.f90 sub.f90:3877:13: 3877 | nout = bcast_array(2) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] sub.f90:9057:50: 9057 | real, save :: lgt_ini, a_ini, Hp_ini, app_om=0 | 1 Warning: Unused variable ‘app_om’ declared at (1) [-Wunused-variable] sub.f90:9054:45: 9054 | integer, save :: nt_file, it_file, iTij=0 | 1 Warning: Unused variable ‘itij’ declared at (1) [-Wunused-variable] sub.f90:7718:41: 7718 | subroutine calc_slope_diff_flux(f,j,p,h_slope_limited,nlf,div_flux,div_type, & | 1 Warning: Unused dummy argument ‘p’ at (1) [-Wunused-dummy-argument] sub.f90:7347:17: 7347 | real :: fac | 1 Warning: Unused variable ‘fac’ declared at (1) [-Wunused-variable] sub.f90:7346:18: 7346 | integer :: m,n,j,inde | 1 Warning: Unused variable ‘m’ declared at (1) [-Wunused-variable] sub.f90:7345:55: 7345 | real, allocatable, dimension(:) :: mean, mean_tmp | 1 Warning: Unused variable ‘mean_tmp’ declared at (1) [-Wunused-variable] sub.f90:7346:20: 7346 | integer :: m,n,j,inde | 1 Warning: Unused variable ‘n’ declared at (1) [-Wunused-variable] sub.f90:4081:30: 4081 | subroutine vecout(lun,file,vv,thresh,nvec) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] sub.f90:376:22: 376 | subroutine mean_mn(a,res) | ^ Warning: ‘mean_mn’ defined but not used [-Wunused-function] sub.f90:480:21: 480 | subroutine rms_mn(a,res) | ^ Warning: ‘rms_mn’ defined but not used [-Wunused-function] sub.f90:515:22: 515 | subroutine rms2_mn(a2,res) | ^ Warning: ‘rms2_mn’ defined but not used [-Wunused-function] sub.f90:646:27: 646 | subroutine contract_jk3(a,c) | ^ Warning: ‘contract_jk3’ defined but not used [-Wunused-function] sub.f90:1673:22: 1673 | subroutine der_2nd(f,k,df,j) | ^ Warning: ‘der_2nd’ defined but not used [-Wunused-function] sub.f90:1749:27: 1749 | subroutine der_2nd_stag(f,k,df,j) | ^ Warning: ‘der_2nd_stag’ defined but not used [-Wunused-function] sub.f90:5091:25: 5091 | subroutine nan_inform(f,msg,region,int1,int2,int3,int4,lstop) | ^ Warning: ‘nan_inform’ defined but not used [-Wunused-function] sub.f90:8346:32: 8346 | subroutine calc_lin_interpol(f,j,fim12,fip12,k) | ^ Warning: ‘calc_lin_interpol’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o diagnostics.o -c diagnostics.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o fourier_fftpack.o -c fourier_fftpack.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o grid.o -c grid.f90 grid.f90:1344:24: 1344 | elseif (ncoarse>nz/nghost) then | 1 Warning: Integer division truncated to constant ‘5’ at (1) [-Winteger-division] grid.f90:1345:18: 1345 | ncoarse=nz/nghost | 1 Warning: Integer division truncated to constant ‘5’ at (1) [-Winteger-division] grid.f90:2297:35: 2297 | character(len=linelen) :: msg | 1 Warning: Unused variable ‘msg’ declared at (1) [-Wunused-variable] grid.f90:1518:29: 1518 | subroutine quintic_interp(nn,a,ninds,dc) | ^ Warning: ‘quintic_interp’ defined but not used [-Wunused-function] fourier_common.h:4:28: 4 | kx_fft=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2)*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] fourier_common.h:4:58: 4 | kx_fft=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2)*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] fourier_common.h:13:28: 13 | ky_fft=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2)*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] fourier_common.h:13:58: 13 | ky_fft=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2)*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] fourier_common.h:22:28: 22 | kz_fft=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2)*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] fourier_common.h:22:58: 22 | kz_fft=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2)*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] fourier_fftpack.f90:4527:43: 4527 | subroutine fourier_shift_y(a_re,shift_y) | 1 Warning: Unused dummy argument ‘shift_y’ at (1) [-Wunused-dummy-argument] diagnostics.f90:3783:36: 3783 | integer :: nmax, nsum, nmin, i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] diagnostics.f90:3783:33: 3783 | integer :: nmax, nsum, nmin, i | 1 Warning: Unused variable ‘nmin’ declared at (1) [-Wunused-variable] diagnostics.f90:2158:24: 2158 | integer :: iname,i,isum | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] diagnostics.f90:2158:29: 2158 | integer :: iname,i,isum | 1 Warning: Unused variable ‘isum’ declared at (1) [-Wunused-variable] diagnostics.f90:1356:68: 1356 | integer function fparse_name(iname,cname,ctest,itest,cform,ncomp) | 1 Warning: Unused dummy argument ‘ncomp’ at (1) [-Wunused-dummy-argument] diagnostics.f90:770:85: 770 | integer :: iname, imax_count, isum_count, nmax_count, nsum_count, itype, maxreq | 1 Warning: Unused variable ‘maxreq’ declared at (1) [-Wunused-variable] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o nodensity_methods.o -c nodensity_methods.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o nogravity.o -c nogravity.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o noeos.o -c noeos.f90 noeos.f90:41:31: 41 | real :: lnTT0=impossible, TT0=impossible | 1 Warning: Unused PRIVATE module variable ‘tt0’ declared at (1) [-Wunused-value] noeos.f90:1001:47: 1001 | subroutine bc_ss_temp_z(f,topbot,lone_sided) | 1 Warning: Unused dummy argument ‘lone_sided’ at (1) [-Wunused-dummy-argument] noeos.f90:568:37: 568 | logical, pointer :: lmultilayer, lheatc_chiconst, lheatc_kramers, lheatc_Kprof, lheatc_Kconst | 1 Warning: Unused variable ‘lmultilayer’ declared at (1) [-Wunused-variable] noeos.f90:438:46: 438 | elemental subroutine get_soundspeed(TT,cs2) | 1 Warning: Dummy argument ‘cs2’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] noeos.f90:438:42: 438 | elemental subroutine get_soundspeed(TT,cs2) | 1 Warning: Unused dummy argument ‘tt’ at (1) [-Wunused-dummy-argument] noeos.f90:416:72: 416 | subroutine eoscalc_pencil(ivars,var1,var2,lnrho,ss,yH,lnTT,ee,pp,cs2) | 1 Warning: Dummy argument ‘cs2’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] noeos.f90:394:65: 394 | subroutine eoscalc_point_f(ivars,f,lnrho,ss,yH,lnTT,ee,pp,cs2) | 1 Warning: Dummy argument ‘cs2’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] noeos.f90:370:71: 370 | subroutine eoscalc_point(ivars,var1,var2,lnrho,ss,yH,lnTT,ee,pp,cs2) | 1 Warning: Dummy argument ‘cs2’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] noeos.f90:269:54: 269 | subroutine pressure_gradient_farray(f,cs2,cp1tilde) | 1 Warning: Dummy argument ‘cp1tilde’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] noeos.f90:69:31: 69 | subroutine initialize_eos(f) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] noeos.f90:1858:30: 1858 | subroutine write_thermodyn | ^ Warning: ‘write_thermodyn’ defined but not used [-Wunused-function] noeos.f90:1864:29: 1864 | subroutine read_thermodyn(input_file) | ^ Warning: ‘read_thermodyn’ defined but not used [-Wunused-function] noeos.f90:1874:27: 1874 | subroutine read_species(input_file) | ^ Warning: ‘read_species’ defined but not used [-Wunused-function] noeos.f90:1884:33: 1884 | subroutine find_species_index(species_name,ind_glob,ind_chem,found_specie) | ^ Warning: ‘find_species_index’ defined but not used [-Wunused-function] noeos.f90:1900:24: 1900 | subroutine find_mass(element_name,MolMass) | ^ Warning: ‘find_mass’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -o initcond.o -c initcond.f90 initcond.f90:5193:24: 5193 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2)*scale_factor | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5193:54: 5193 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2)*scale_factor | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5197:24: 5197 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2)*scale_factor | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5197:54: 5197 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2)*scale_factor | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5201:24: 5201 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2)*scale_factor | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5201:54: 5201 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2)*scale_factor | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5082:29: 5082 | k2x = cshift((/(i-(nx+1)/2,i=0,nx-1)/),+(nx+1)/2)*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] initcond.f90:5082:51: 5082 | k2x = cshift((/(i-(nx+1)/2,i=0,nx-1)/),+(nx+1)/2)*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] initcond.f90:5085:29: 5085 | k2y = cshift((/(i-(ny+1)/2,i=0,ny-1)/),+(ny+1)/2)*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] initcond.f90:5085:51: 5085 | k2y = cshift((/(i-(ny+1)/2,i=0,ny-1)/),+(ny+1)/2)*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] initcond.f90:5088:29: 5088 | k2z = cshift((/(i-(nz+1)/2,i=0,nz-1)/),+(nz+1)/2)*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] initcond.f90:5088:51: 5088 | k2z = cshift((/(i-(nz+1)/2,i=0,nz-1)/),+(nz+1)/2)*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] initcond.f90:7874:42: 7874 | real, dimension (mx,my,mz,3) :: apot | 1 Warning: Array ‘apot’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] initcond.f90:6203:63: 6203 | integer :: i, i1a, i1b, i2a, i2b, ikx, iky, ikz, stat, ik, nk, ndim_u, ndim_v | 1 Warning: Unused variable ‘ik’ declared at (1) [-Wunused-variable] initcond.f90:6207:44: 6207 | real, dimension (:), allocatable :: kk | 1 Warning: Unused variable ‘kk’ declared at (1) [-Wunused-variable] initcond.f90:6203:67: 6203 | integer :: i, i1a, i1b, i2a, i2b, ikx, iky, ikz, stat, ik, nk, ndim_u, ndim_v | 1 Warning: Unused variable ‘nk’ declared at (1) [-Wunused-variable] initcond.f90:3218:51: 3218 | real, dimension (nxgrid,nzgrid,mvar) :: slice | 1 Warning: Array ‘slice’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] initcond.f90:2568:17: 2568 | real :: kx1, ky1, kz1 | 1 Warning: Unused variable ‘kx1’ declared at (1) [-Wunused-variable] initcond.f90:2568:22: 2568 | real :: kx1, ky1, kz1 | 1 Warning: Unused variable ‘ky1’ declared at (1) [-Wunused-variable] initcond.f90:2568:27: 2568 | real :: kx1, ky1, kz1 | 1 Warning: Unused variable ‘kz1’ declared at (1) [-Wunused-variable] initcond.f90:1866:47: 1866 | subroutine beltramik_general(ampl,f,i,kx,ky,kz,phase) | 1 Warning: Unused dummy argument ‘ky’ at (1) [-Wunused-dummy-argument] initcond.f90:1866:50: 1866 | subroutine beltramik_general(ampl,f,i,kx,ky,kz,phase) | 1 Warning: Unused dummy argument ‘kz’ at (1) [-Wunused-dummy-argument] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -fallow-argument-mismatch -o special.o -c special.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -fPIC -o special/backreact_infl.o -c special/backreact_infl.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -fdefault-real-8 -fdefault-double-8 -std=f2003 -fPIC -o special/disp_current.o -c special/disp_current.f90 special.f90:747:71: 747 | call caller2(special_sub_handles(i,I_INPUT_PERSIST_SPECIAL_ID),id,done) | 1 ...... 798 | call caller2(special_sub_handles(i,I_CALC_DIAGNOSTICS_SPECIAL),f,p) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(8)). special.f90:747:74: 747 | call caller2(special_sub_handles(i,I_INPUT_PERSIST_SPECIAL_ID),id,done) | 1 ...... 798 | call caller2(special_sub_handles(i,I_CALC_DIAGNOSTICS_SPECIAL),f,p) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (LOGICAL(4)/TYPE(pencil_case)). special.f90:682:20: 682 | f,df,dt_,llast) | 1 ...... 702 | call caller4(special_sub_handles(i,I_SET_INIT_PARAMETERS),Ntot,dsize,init_distr,init_distr2) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-4) special.f90:682:25: 682 | f,df,dt_,llast) | 1 ...... 702 | call caller4(special_sub_handles(i,I_SET_INIT_PARAMETERS),Ntot,dsize,init_distr,init_distr2) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (rank-1 and scalar) special.f90:682:29: 682 | f,df,dt_,llast) | 1 ...... 702 | call caller4(special_sub_handles(i,I_SET_INIT_PARAMETERS),Ntot,dsize,init_distr,init_distr2) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (LOGICAL(4)/REAL(8)). special.f90:567:71: 567 | call caller5(special_sub_handles(i,I_SPECIAL_CALC_PARTICLES),f,df,fp,dfp,ineargrid) | 1 ...... 787 | call caller5(special_sub_handles(i,I_SPECIAL_PARTICLES_AFTER_DTSUB),f,dtsub,fp,dfp,ineargrid) | 2 Warning: Rank mismatch between actual argument at (1) and actual argument at (2) (scalar and rank-4) special.f90:441:56: 441 | call caller3(special_sub_handles(i,modind),f,df,p) | 1 ...... 587 | call caller3(special_sub_handles(i,I_SPECIAL_PARTICLES_BFRE_BDARY),f,fp,ineargrid) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (TYPE(pencil_case)/INTEGER(4)). special.f90:383:69: 383 | call caller1(special_sub_handles(i,I_WRITE_SPECIAL_RUN_PARS),unit) | 1 ...... 640 | call caller1(special_sub_handles(i,I_SPECIAL_AFTER_BOUNDARY),f) | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(8)). special.f90:802:31: 802 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] special.f90:730:42: 730 | subroutine special_calc_spectra_byte(f,spec,spec_hel,lfirstcall,kind,len) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] special.f90:730:72: 730 | subroutine special_calc_spectra_byte(f,spec,spec_hel,lfirstcall,kind,len) | 1 Warning: Unused dummy argument ‘kind’ at (1) [-Wunused-dummy-argument] special.f90:730:67: 730 | subroutine special_calc_spectra_byte(f,spec,spec_hel,lfirstcall,kind,len) | 1 Warning: Unused dummy argument ‘lfirstcall’ at (1) [-Wunused-dummy-argument] special.f90:730:47: 730 | subroutine special_calc_spectra_byte(f,spec,spec_hel,lfirstcall,kind,len) | 1 Warning: Unused dummy argument ‘spec’ at (1) [-Wunused-dummy-argument] special.f90:730:56: 730 | subroutine special_calc_spectra_byte(f,spec,spec_hel,lfirstcall,kind,len) | 1 Warning: Unused dummy argument ‘spec_hel’ at (1) [-Wunused-dummy-argument] special.f90:694:44: 694 | real, dimension(mx,my,mz,mfarray) :: f | 1 Warning: Unused variable ‘f’ declared at (1) [-Wunused-variable] special.f90:318:18: 318 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] special.f90:115:8: 115 | use Cdata, only: lroot, lreloading, iproc | 1 Warning: Unused module variable ‘iproc’ which has been explicitly imported at (1) [-Wunused-variable] special.f90:126:45: 126 | character(LEN=8) :: mod_prefix, mod_infix, mod_suffix | 1 Warning: Unused variable ‘mod_infix’ declared at (1) [-Wunused-variable] special.f90:126:34: 126 | character(LEN=8) :: mod_prefix, mod_infix, mod_suffix | 1 Warning: Unused variable ‘mod_prefix’ declared at (1) [-Wunused-variable] special.f90:126:57: 126 | character(LEN=8) :: mod_prefix, mod_infix, mod_suffix | 1 Warning: Unused variable ‘mod_suffix’ declared at (1) [-Wunused-variable] special/disp_current.f90:69:2: 69 | <<<<<<< .mine | 1 Error: Invalid character in name at (1) special/disp_current.f90:70:36: 70 | namelist /disp_current_init_pars/ & | 1 Error: Syntax error in NAMELIST statement at (1) special/disp_current.f90:72:36: 72 | namelist /disp_current_init_pars/ & | 1 Error: Syntax error in NAMELIST statement at (1) special/disp_current.f90:76:36: 76 | namelist /disp_current_init_pars/ & | 1 Error: Syntax error in NAMELIST statement at (1) special/backreact_infl.f90:93:74: 93 | real :: phi0=.44, dphi0=-1.69e-7, c_light_axion=1., lambda_axion=0., eps=.01 | 1 Warning: Unused PRIVATE module variable ‘eps’ declared at (1) [-Wunused-value] special/backreact_infl.f90:97:55: 97 | real :: kgaussian_phi=0.,kpeak_phi=0., kgaussian_dphi=0., kpeak_dphi=0. | 1 Warning: Unused PRIVATE module variable ‘kgaussian_dphi’ declared at (1) [-Wunused-value] special/backreact_infl.f90:113:28: 113 | logical :: lbackreact_infl=.true., lem_backreact=.true., lzeroHubble=.false. | 1 Warning: Unused PRIVATE module variable ‘lbackreact_infl’ declared at (1) [-Wunused-value] special/backreact_infl.f90:94:77: 94 | real :: amplphi=.1, ampldphi=.0, kx_phi=1., ky_phi=0., kz_phi=0., phase_phi=0., width=.1, offset=0. | 1 Warning: Unused PRIVATE module variable ‘phase_phi’ declared at (1) [-Wunused-value] ../backreact_infl_dummies.inc:413:31: Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] ../backreact_infl_dummies.inc:383:44: Warning: Array ‘f’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] ../backreact_infl_dummies.inc:292:79: Warning: Unused dummy argument ‘kind’ at (1) [-Wunused-dummy-argument] special/backreact_infl.f90:679:43: 679 | subroutine rprint_special(lreset,lwrite) | 1 Warning: Unused dummy argument ‘lwrite’ at (1) [-Wunused-dummy-argument] special/backreact_infl.f90:627:43: 627 | subroutine calc_diagnostics_special(f,p) | 1 Warning: Unused dummy argument ‘p’ at (1) [-Wunused-dummy-argument] special/disp_current.f90:954:53: 954 | read(parallel_unit, NML=disp_current_init_pars, IOSTAT=iostat) | 1 Error: Symbol ‘disp_current_init_pars’ at (1) must be a NAMELIST group name special/disp_current.f90:962:45: 962 | write(unit, NML=disp_current_init_pars) | 1 Error: Symbol ‘disp_current_init_pars’ at (1) must be a NAMELIST group name special/disp_current.f90:714:28: 714 | call multsv_add(gtmp,p%infl_dphi,p%bb,gtmp) | 1 Warning: Same actual argument associated with INTENT(IN) argument ‘a’ and INTENT(OUT) argument ‘d’ at (1) make[1]: *** [Makefile.src:3012: special/disp_current.o] Error 1 make[1]: *** Waiting for unfinished jobs.... make[1]: Leaving directory '/home/pencil/default/samples/Schwinger/src' make: *** [Makefile:25: default_to_be] Error 2 'make -j FFLAGS_DOUBLE=-fdefault-real-8 -fdefault-double-8 CFLAGS_DOUBLE=-DDOUBLE_PRECISION LD_MPI= CFLAGS_FFTW3= FFLAGS_FFTW3= LD_FFTW3= CFLAGS_FFTW2= FFLAGS_FFTW2= LD_FFTW2= FC=mpif90 F77=mpif77 FFLAGS=-O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow LDFLAGS_HELPER=-dynamic OMPFFLAGS=-fopenmp OMPLFLAGS=-lgomp PPFLAGS=-cpp FSTD_95=-std=f95 FSTD_2003=-std=f2003 MODULE_PREFIX=__ MODULE_INFIX=_MOD_ MODULE_SUFFIX= CC=mpicc CFLAGS=-DFUNDERSC=1 default_to_be' failed: ['\nice -n 15 pc_build --config-files=GNU-GCC_MPI+GNU-GCC_debug ' reported: ]