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' 'CSTD=-std=c99' 'CFLAGS=-DFUNDERSC=1' 'CMAKE_BUILD_TYPE=Debug' '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/full/samples/power_xy/complex_lpowerxyhdf5/nprocy_2/src' HDF5_PATH not set Compiler: gfortran GCC version: 11 Makefile.src:2944: 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 density.f90 deriv.f90 nodetonate.f90 nodustdensity.f90 nodustvelocity.f90 entropy.f90 eos_idealgas.f90 nofixed_point.f90 noforcing.f90 gravity_simple.f90 nogpu.f90 grid.f90 noheatflux.f90 hydro.f90 nohyperresi_strict.f90 nohypervisc_strict.f90 noimplicit_diffusion.f90 noimplicit_physics.f90 noinitial_condition.f90 nointerstellar.f90 nolorenz_gauge.f90 nomagnetic.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 timestep.f90 notraining.f90 viscosity.f90 cparam.local nospecial.f90 ${PENCIL_HOME}/utils/pc_identify_revision --reset HDF5 compiler and linker in /bin/h5pfc. make -f Makefile.src start.o run.o start.x run.x make[2]: Entering directory '/home/pencil/full/samples/power_xy/complex_lpowerxyhdf5/nprocy_2/src' HDF5_PATH not set Compiler: gfortran GCC version: 11 Makefile.src:2944: GCC version > 9 ==> allowing argument mismatch in mpicomm.f90, noparticles_mpicomm.f90, syscalls.f90 and 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 cparam.o -c cparam.f90 mpicc -DFUNDERSC=1 -DDOUBLE_PRECISION -std=c99 -o syscalls_ansi.o -c syscalls_ansi.c mpicc -DFUNDERSC=1 -DDOUBLE_PRECISION -std=c99 -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 eos_idealgas.f90 -o eos_dummies.inc morton_helper.c:1:9: warning: #pragma once in main file 1 | #pragma once | ^~~~ 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 mpicc -DFUNDERSC=1 -DDOUBLE_PRECISION -std=c99 -o nogsl.o -c nogsl.c cparam.f90:78:39: 78 | integer, parameter :: nrcylrun=max(nx/20,1) | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] cparam.f90:141:47: 141 | integer, parameter :: impossible_int=-max_int/100 | 1 Warning: Integer division truncated to constant ‘21474836’ at (1) [-Winteger-division] scripts/mkdummyinc -d noentropy.f90 -s entropy.f90 -o energy_dummies.inc mpicc -DFUNDERSC=1 -DDOUBLE_PRECISION -std=c99 -o nogpu_astaroth_ansi.o -c nogpu_astaroth_ansi.c 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:605:21: 605 | integer :: lpoint=(mx+1)/2,mpoint=(my+1)/2,npoint=(mz+1)/2 | 1 Warning: Integer division truncated to constant ‘19’ at (1) [-Winteger-division] cdata.f90:605:37: 605 | 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:605:53: 605 | integer :: lpoint=(mx+1)/2,mpoint=(my+1)/2,npoint=(mz+1)/2 | 1 Warning: Integer division truncated to constant ‘19’ at (1) [-Winteger-division] cdata.f90:606:22: 606 | integer :: lpoint2=(mx+1)/4,mpoint2=(my+1)/4,npoint2=(mz+1)/4 | 1 Warning: Integer division truncated to constant ‘9’ at (1) [-Winteger-division] cdata.f90:606:39: 606 | 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] cdata.f90:606:56: 606 | integer :: lpoint2=(mx+1)/4,mpoint2=(my+1)/4,npoint2=(mz+1)/4 | 1 Warning: Integer division truncated to constant ‘9’ at (1) [-Winteger-division] 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) 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 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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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: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) syscalls.f90:489:21: 489 | call copy_addr_c(var,caddr) | 1 ...... 498 | 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:502:34: 502 | 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 -std=f2003 -o general.o -c general.f90 general.f90:6961:35: 6961 | type(two_dim_array_dims) :: dim | 1 Warning: Unused variable ‘dim’ declared at (1) [-Wunused-variable] general.f90:6944:38: 6944 | type(single_dim_array_dims) :: dim | 1 Warning: Unused variable ‘dim’ declared at (1) [-Wunused-variable] general.f90:6577:10: 6577 | use Cdata, only: iproc | 1 Warning: Unused module variable ‘iproc’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5519:10: 5519 | use Cdata, only: iproc, iproc_world | 1 Warning: Unused module variable ‘lroot’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5519:10: 5519 | use Cdata, only: iproc, iproc_world | 1 Warning: Unused module variable ‘lyang’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5456:10: 5456 | use Cdata, only: y, z | 1 Warning: Unused module variable ‘y’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5456:10: 5456 | use Cdata, only: y, z | 1 Warning: Unused module variable ‘z’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5385:10: 5385 | 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:5385:10: 5385 | 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:5345:10: 5345 | use Cdata, only: l2, n2, m2, cosph, sinph, costh, sinth | 1 Warning: Unused module variable ‘l2’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:4783:36: 4783 | function rangegen(start,end,step) | 1 Warning: Unused dummy argument ‘step’ at (1) [-Wunused-dummy-argument] general.f90:514:10: 514 | use Cdata, only: mm,nn,imn_array,necessary,necessary_imn,lroot,ip, & | 1 Warning: Unused module variable ‘l2’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:514:10: 514 | use Cdata, only: mm,nn,imn_array,necessary,necessary_imn,lroot,ip, & | 1 Warning: Unused module variable ‘l2i’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:487:10: 487 | 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:2076:28: 2076 | subroutine tridag_double(a,b,c,r,u,err) | ^ Warning: ‘tridag_double’ defined but not used [-Wunused-function] general.f90:5205:4: 5205 | function detect_precision_of_binary(file,reclen) result(prec) | ^ Warning: ‘detect_precision_of_binary’ defined but not used [-Wunused-function] general.f90:6224:25: 6224 | 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 -std=f2003 -o nodebug.o -c nodebug.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 noweno_transport.o -c noweno_transport.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 nosolid_cells.o -c nosolid_cells.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 nopython.o -c nopython.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 notestperturb.o -c notestperturb.f90 nodebug.f90:12:6: 12 | use Cdata, only: mx,headtt,imn | 1 Warning: Unused module variable ‘imn’ which has been explicitly imported at (1) [-Wunused-variable] nopython.f90:28:41: 28 | subroutine write_python_run_pars(unit) | 1 Warning: Unused dummy argument ‘unit’ at (1) [-Wunused-dummy-argument] nodebug.f90:40:6: 40 | use Cdata, only: mx,headtt,imn | 1 Warning: Unused module variable ‘imn’ which has been explicitly imported 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 -fallow-argument-mismatch -o mpicomm.o -c mpicomm.f90 mpicomm.f90:878:39: 878 | 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:878:39: 878 | 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:884:38: 884 | 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:884:38: 884 | 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:895:56: 895 | 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:895:56: 895 | 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:901:55: 901 | 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:901:55: 901 | 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:907:54: 907 | 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:907:54: 907 | 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:913:55: 913 | 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:913:55: 913 | 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:1195:25: 1195 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1195:38: 1195 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1195:25: 1195 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1195:38: 1195 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1284:25: 1284 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1284:38: 1284 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1284:25: 1284 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1284:38: 1284 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1538:55: 1538 | poleneigh = find_proc(ipx, ipy,ipz +nprocz/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1539:55: 1539 | pnbcrn = find_proc(ipx, 0,ipz-1+nprocz/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1540:55: 1540 | pnfcrn = find_proc(ipx, 0,ipz+1+nprocz/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1541:55: 1541 | psfcrn = find_proc(ipx,nprocy-1,ipz+1+nprocz/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1542:55: 1542 | psbcrn = find_proc(ipx,nprocy-1,ipz-1+nprocz/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:10494:46: 10494 | integer, parameter :: nprocz_rd=nprocz/3 | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:9840:29: 9840 | do px = 1, nprocx-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] mpicomm.f90:9860:29: 9860 | do pz = 1, nprocz-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] mpicomm.f90:3470:11: 3470 | mult=len_array/max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:3471:11: 3471 | 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:3496:11: 3496 | mult=len_array/max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:3497:11: 3497 | 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:10896:26: 10896 | call MPI_SCATTERV(src,counts,dspls,mpi_precision,dest,nlocal,mpi_precision,root,MPI_COMM_PENCIL,mpierr) | 1 ...... 10925 | 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:10442:22: 10442 | call MPI_GATHER(flag, 1, MPI_LOGICAL, flags, 1, MPI_LOGICAL, root, MPI_COMM_PENCIL, mpierr) | 1 ...... 10910 | 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:10285:46: 10282 | call MPI_RECV(rowbuf_cmplx, nsend, MPI_CMPLX, ig, tag, ioptest(comm,MPI_COMM_GRID), status, mpierr) | 2 ...... 10285 | 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:10305:46: 10297 | call MPI_SEND(sendbuf_cmplx(iy,ixa:ixe:ixs,iz,ic), & | 2 ...... 10305 | 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:5289:24: 5289 | call MPI_REDUCE(fland_tmp, fland, nreduce, MPI_LOGICAL, MPI_LAND, root,& | 1 ...... 10386 | 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:5079:24: 5079 | call MPI_REDUCE(fsum_tmp, fsum, 1, mpi_precision, MPI_SUM, root, & | 1 ...... 10386 | 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:4944:22: 4944 | call MPI_REDUCE(fmin_tmp, fmin, 1, mpi_precision, MPI_MIN, root, & | 1 ...... 10386 | 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:4872:22: 4872 | call MPI_REDUCE(fmax_tmp, fmax, 1, mpi_precision, MPI_MAX, root, & | 1 ...... 10386 | 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:4861:25: 4861 | call MPI_ALLREDUCE(MPI_IN_PLACE, lor, n, MPI_LOGICAL, MPI_LOR, ioptest(comm,MPI_COMM_GRID), mpierr) | 1 ...... 5558 | 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:4411:21: 4411 | call MPI_BCAST(bcast_array,nbcast_array,MPI_COMPLEX,ibcast_proc, & | 1 ...... 10479 | 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:4131:21: 4131 | call MPI_BCAST(lbcast_array, product(nbcast_array), MPI_LOGICAL, ioptest(proc,root), & | 1 ...... 10479 | 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:4114:21: 4114 | call MPI_BCAST(lbcast_array,nbcast_array,MPI_LOGICAL,ioptest(proc,root), & | 1 ...... 10479 | 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:4065:23: 4065 | call MPI_ISEND(bcast_array, nbcast_array, MPI_INTEGER, proc_rec, & | 1 ...... 6557 | 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:3806:21: 3806 | call MPI_IRECV(bcast_array, nbcast_array, MPI_INTEGER, proc_src, & | 1 ...... 6552 | 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:3661:24: 3661 | call MPI_SENDRECV(send_array,1,mpi_precision,proc_dest,sendtag, & | 1 ...... 3740 | 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:3646:24: 3646 | call MPI_SENDRECV(send_array,sendcnt,MPI_INTEGER,proc_dest,sendtag, & | 1 ...... 3740 | 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:3141:23: 3141 | call MPI_IRECV(bcast_array, 1, mpi_precision, proc_src, & | 1 ...... 6552 | 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:760:31: 758 | call MPI_Win_create(a, size, 1, MPI_INFO_NULL, MPI_COMM_WORLD, win, mpierr) | 2 759 | else ! hence other ranks do not declare a window 760 | 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:569:41: 569 | call MPI_COMM_SPLIT(MPI_COMM_GRID, ipy+nprocy*ipz, ipx, & | 1 ...... 11680 | 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:269:38: 269 | call MPI_TYPE_SIZE(MPI_INTEGER, size_of_int, mpierr) | 1 ...... 4483 | 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:10948:25: 10948 | 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:10948:100: 10948 | 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:7560:49: 7560 | integer, dimension(MPI_STATUS_SIZE) :: stat | 1 Warning: Unused variable ‘stat’ declared at (1) [-Wunused-variable] mpicomm.f90:7443:49: 7443 | integer, dimension(MPI_STATUS_SIZE) :: stat | 1 Warning: Unused variable ‘stat’ declared at (1) [-Wunused-variable] mpicomm.f90:6725:45: 6725 | subroutine distribute_yz_3D(out, in, comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:5628:33: 5628 | subroutine transp(a,var, comm, lsync) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:5647:57: 5647 | real, dimension(nz,ny,nz) :: send_buf_z, recv_buf_z | 1 Warning: Array ‘recv_buf_z’ 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:5647:45: 5647 | real, dimension(nz,ny,nz) :: send_buf_z, recv_buf_z | 1 Warning: Array ‘send_buf_z’ 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:4543:68: 4543 | subroutine mpiallreduce_sum_arr2(fsum_tmp,fsum,nreduce,idir,comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:4518:67: 4518 | subroutine mpiallreduce_sum_arr(fsum_tmp,fsum,nreduce,idir,comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:2682:49: 2682 | 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:2682:53: 2682 | 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:2411:38: 2411 | integer :: ivar1, ivar2, nbuf, j, ny_loc, nx_loc, nvar_loc | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:2356:38: 2356 | integer :: ivar1, ivar2, nbuf, j, nx_loc, nz_loc, nvar_loc | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:1511:80: 1511 | integer :: ivar1, ivar2, nbufy, nbufz, nbufyz, mxl, comm, bufact, dir,mm,j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:692:57: 692 | gridbuf_left, & ! ~ of left corner neighbour | 1 Warning: Unused variable ‘gridbuf_left’ declared at (1) [-Wunused-variable] mpicomm.f90:691:57: 691 | 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:691:71: 691 | 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:693:58: 693 | gridbuf_right ! ~ of right corner neighbour | 1 Warning: Unused variable ‘gridbuf_right’ declared at (1) [-Wunused-variable] mpicomm.f90:685:41: 685 | subroutine set_cubed_sphere_neighbors | ^ Warning: ‘set_cubed_sphere_neighbors’ defined but not used [-Wunused-function] mpicomm.f90:3227:33: 3227 | 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:3437:39: 3437 | 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:3507:39: 3507 | 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:3572:33: 3572 | 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:9885:30: 9885 | subroutine distribute_grid(x, y, z, gx, gy, gz) | ^ Warning: ‘distribute_grid’ 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 ghost_check.o -c ghost_check.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 nosolid_cells_mpicomm.o -c nosolid_cells_mpicomm.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=f95 -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 -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 -std=f2003 -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 debug_io_dist.o -c debug_io_dist.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 nofarray_alloc.o -c nofarray_alloc.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 noimplicit_diffusion.o -c noimplicit_diffusion.f90 shared_variables.f90:275:38: 275 | subroutine get_variable_real0d_alt(varname,variable,ierr) | ^ Warning: ‘get_variable_real0d_alt’ defined but not used [-Wunused-function] nofarray_alloc.f90:7:40: 7 | real, dimension(mx,my,mz,mfarray) :: f | 1 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] noimplicit_diffusion.f90:40:51: 40 | subroutine integrate_diffusion(get_diffus_coeff, f, ivar1, ivar2) | 1 Warning: Unused dummy argument ‘get_diffus_coeff’ at (1) [-Wunused-dummy-argument] file_io_common.inc:357:38: 357 | 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:345:48: 345 | logical :: lnamelist_optional, lno_warning | 1 Warning: Unused variable ‘lno_warning’ declared at (1) [-Wunused-variable] file_io_common.inc:344:30: 344 | integer :: namelist_mode | 1 Warning: Unused variable ‘namelist_mode’ declared at (1) [-Wunused-variable] 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:185:36: 185 | 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 nogpu.o -c nogpu.f90 nogpu.f90:163:29: 163 | subroutine calcQ_gpu(idir, dir, stop, dlength, unit_vec, lperiodic) | 1 Warning: Unused dummy argument ‘idir’ at (1) [-Wunused-dummy-argument] nogpu.f90:163:70: 163 | subroutine calcQ_gpu(idir, dir, stop, dlength, unit_vec, lperiodic) | 1 Warning: Unused dummy argument ‘lperiodic’ at (1) [-Wunused-dummy-argument] nogpu.f90:110:45: 110 | subroutine copy_farray_from_GPU(f,nowait_) | 1 Warning: Unused dummy argument ‘nowait_’ at (1) [-Wunused-dummy-argument] nogpu.f90:68:31: 68 | logical :: early_finalize | 1 Warning: Unused variable ‘early_finalize’ declared at (1) [-Wunused-variable] nogpu.f90:57:31: 57 | logical :: early_finalize | 1 Warning: Unused variable ‘early_finalize’ declared at (1) [-Wunused-variable] h5pfc -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 -c hdf5_io_parallel.f90 -o hdf5_io_parallel.o hdf5_io_parallel.f90:2851:16: 2851 | mxgrid_ = global_size(1) | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] hdf5_io_parallel.f90:2852:16: 2852 | mygrid_ = global_size(2) | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] hdf5_io_parallel.f90:2853:16: 2853 | mzgrid_ = global_size(3) | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] hdf5_io_parallel.f90:2596:25: 2596 | integer :: pos, vec, arr, l | 1 Warning: Unused variable ‘vec’ declared at (1) [-Wunused-variable] hdf5_io_parallel.f90:2545:10: 2545 | use Mpicomm, only: mpibcast_real, MPI_COMM_PENCIL | 1 Warning: Unused module variable ‘mpi_comm_pencil’ which has been explicitly imported at (1) [-Wunused-variable] hdf5_io_parallel.f90:2476:62: 2476 | subroutine output_profile(name, coord, a, type, lsave_name, lhas_ghost) | 1 Warning: Unused dummy argument ‘lsave_name’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2180:32: 2180 | subroutine trim_average(path, plane, ngrid, nname) | 1 Warning: Unused dummy argument ‘path’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2127:46: 2127 | subroutine output_average_phi(path, number, nr, nc, name, data, time, r, dr) | 1 Warning: Unused dummy argument ‘number’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2127:38: 2127 | subroutine output_average_phi(path, number, nr, nc, name, data, time, r, dr) | 1 Warning: Unused dummy argument ‘path’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2080:89: 2080 | subroutine output_average_1D_chunked(path, label, nc, name, data, full, time, lbinary, lwrite, header) | 1 Warning: Unused dummy argument ‘lbinary’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2080:45: 2080 | subroutine output_average_1D_chunked(path, label, nc, name, data, full, time, lbinary, lwrite, header) | 1 Warning: Unused dummy argument ‘path’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2035:75: 2035 | subroutine output_average_1D(path, label, nc, name, data, time, lbinary, lwrite, header) | 1 Warning: Unused dummy argument ‘lbinary’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2035:37: 2035 | subroutine output_average_1D(path, label, nc, name, data, time, lbinary, lwrite, header) | 1 Warning: Unused dummy argument ‘path’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:2003:41: 2003 | integer :: it, nt, comm, slice_root | 1 Warning: Unused variable ‘slice_root’ declared at (1) [-Wunused-variable] hdf5_io_parallel.f90:1989:46: 1989 | subroutine input_average_2D(filename, time, variables, data) | 1 Warning: Unused dummy argument ‘time’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:1989:57: 1989 | subroutine input_average_2D(filename, time, variables, data) | 1 Warning: Unused dummy argument ‘variables’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:1909:66: 1909 | prec_in, nghost_in, nprocx_in, nprocy_in, nprocz_in, local) | 1 Warning: Unused dummy argument ‘local’ at (1) [-Wunused-dummy-argument] hdf5_io_parallel.f90:1989:31: 1989 | subroutine input_average_2D(filename, time, variables, data) | ^ Warning: ‘input_average_2d’ 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:546:21: 546 | do i=1,mscratch | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] farray.f90:995:55: 995 | 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 -std=f2003 -o io_hdf5.o -c io_hdf5.f90 io_hdf5.f90:35:40: 35 | character (len=fnlen) :: last_snapshot = "" | 1 Warning: Unused PRIVATE module variable ‘last_snapshot’ declared at (1) [-Wunused-value] io_hdf5.f90:1383:25: 1383 | subroutine rgrid(file) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:1355:25: 1355 | subroutine wgrid(file,mxout,myout,mzout,lwrite) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:1355:31: 1355 | subroutine wgrid(file,mxout,myout,mzout,lwrite) | 1 Warning: Unused dummy argument ‘mxout’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:1355:37: 1355 | subroutine wgrid(file,mxout,myout,mzout,lwrite) | 1 Warning: Unused dummy argument ‘myout’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:1355:43: 1355 | subroutine wgrid(file,mxout,myout,mzout,lwrite) | 1 Warning: Unused dummy argument ‘mzout’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:1268:50: 1268 | logical function read_persist_torus_rect(label,value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:1268:56: 1268 | logical function read_persist_torus_rect(label,value) | 1 Warning: Unused dummy argument ‘value’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:902:47: 902 | logical function write_persist_id(label, id) | 1 Warning: Unused dummy argument ‘id’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:902:43: 902 | logical function write_persist_id(label, id) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:506:37: 506 | subroutine initialize_slice(label, pos) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:506:42: 506 | subroutine initialize_slice(label, pos) | 1 Warning: Unused dummy argument ‘pos’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:437:66: 437 | subroutine output_stalker(label, mv, nv, data, nvar, lfinalize) | 1 Warning: Unused dummy argument ‘lfinalize’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:437:55: 437 | subroutine output_stalker(label, mv, nv, data, nvar, lfinalize) | 1 Warning: Unused dummy argument ‘nvar’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:402:38: 402 | subroutine output_stalker_init(num, nv, snap, ID) | 1 Warning: Unused dummy argument ‘num’ at (1) [-Wunused-dummy-argument] io_hdf5.f90:110:36: 110 | integer :: px, py, pz, partner | 1 Warning: Unused variable ‘partner’ declared at (1) [-Wunused-variable] io_hdf5.f90:110:19: 110 | integer :: px, py, pz, partner | 1 Warning: Unused variable ‘px’ declared at (1) [-Wunused-variable] io_hdf5.f90:110:23: 110 | integer :: px, py, pz, partner | 1 Warning: Unused variable ‘py’ declared at (1) [-Wunused-variable] io_hdf5.f90:110:27: 110 | integer :: px, py, pz, partner | 1 Warning: Unused variable ‘pz’ declared at (1) [-Wunused-variable] io_hdf5.f90:506:31: 506 | subroutine initialize_slice(label, pos) | ^ Warning: ‘initialize_slice’ 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 sub.o -c sub.f90 sub.f90:3898:13: 3898 | nout = bcast_array(2) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] sub.f90:9341:45: 9341 | integer :: has_nan_local,has_nan_global | 1 Warning: Unused variable ‘has_nan_global’ declared at (1) [-Wunused-variable] sub.f90:9146:50: 9146 | real, save :: lgt_ini, a_ini, Hp_ini, app_om=0 | 1 Warning: Unused variable ‘app_om’ declared at (1) [-Wunused-variable] sub.f90:7801:41: 7801 | 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:7431:17: 7431 | real :: fac | 1 Warning: Unused variable ‘fac’ declared at (1) [-Wunused-variable] sub.f90:7430:18: 7430 | integer :: m,n,j,inde | 1 Warning: Unused variable ‘m’ declared at (1) [-Wunused-variable] sub.f90:7429:55: 7429 | real, allocatable, dimension(:) :: mean, mean_tmp | 1 Warning: Unused variable ‘mean_tmp’ declared at (1) [-Wunused-variable] sub.f90:7430:20: 7430 | integer :: m,n,j,inde | 1 Warning: Unused variable ‘n’ declared at (1) [-Wunused-variable] sub.f90:4107:30: 4107 | subroutine vecout(lun,file,vv,thresh,nvec) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] sub.f90:3046:35: 3046 | real, dimension(nx) :: f_der1,f_der2,f_der3,f_der4,f_der5,f_der6 | 1 Warning: Unused variable ‘f_der1’ declared at (1) [-Wunused-variable] sub.f90:3046:42: 3046 | real, dimension(nx) :: f_der1,f_der2,f_der3,f_der4,f_der5,f_der6 | 1 Warning: Unused variable ‘f_der2’ declared at (1) [-Wunused-variable] sub.f90:3046:49: 3046 | real, dimension(nx) :: f_der1,f_der2,f_der3,f_der4,f_der5,f_der6 | 1 Warning: Unused variable ‘f_der3’ declared at (1) [-Wunused-variable] sub.f90:3046:56: 3046 | real, dimension(nx) :: f_der1,f_der2,f_der3,f_der4,f_der5,f_der6 | 1 Warning: Unused variable ‘f_der4’ declared at (1) [-Wunused-variable] sub.f90:3046:63: 3046 | real, dimension(nx) :: f_der1,f_der2,f_der3,f_der4,f_der5,f_der6 | 1 Warning: Unused variable ‘f_der5’ declared at (1) [-Wunused-variable] sub.f90:3046:70: 3046 | real, dimension(nx) :: f_der1,f_der2,f_der3,f_der4,f_der5,f_der6 | 1 Warning: Unused variable ‘f_der6’ declared at (1) [-Wunused-variable] sub.f90:374:22: 374 | subroutine mean_mn(a,res) | ^ Warning: ‘mean_mn’ defined but not used [-Wunused-function] sub.f90:478:21: 478 | subroutine rms_mn(a,res) | ^ Warning: ‘rms_mn’ defined but not used [-Wunused-function] sub.f90:513:22: 513 | subroutine rms2_mn(a2,res) | ^ Warning: ‘rms2_mn’ defined but not used [-Wunused-function] sub.f90:644:27: 644 | subroutine contract_jk3(a,c) | ^ Warning: ‘contract_jk3’ defined but not used [-Wunused-function] sub.f90:1691:22: 1691 | subroutine der_2nd(f,k,df,j) | ^ Warning: ‘der_2nd’ defined but not used [-Wunused-function] sub.f90:1767:27: 1767 | subroutine der_2nd_stag(f,k,df,j) | ^ Warning: ‘der_2nd_stag’ defined but not used [-Wunused-function] sub.f90:5176:25: 5176 | subroutine nan_inform(f,msg,region,int1,int2,int3,int4,lstop) | ^ Warning: ‘nan_inform’ defined but not used [-Wunused-function] sub.f90:8433:32: 8433 | subroutine calc_lin_interpol(f,j,fim12,fip12,k) | ^ Warning: ‘calc_lin_interpol’ defined but not used [-Wunused-function] sub.f90:9069:24: 9069 | weights=weights_ | ^ Warning: ‘weights.offset’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9062:49: 9062 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9069:24: 9069 | weights=weights_ | ^ Warning: ‘weights.dim[0].lbound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9062:49: 9062 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9069:24: 9069 | weights=weights_ | ^ Warning: ‘weights.dim[0].ubound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9062:49: 9062 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9069:24: 9069 | weights=weights_ | ^ Warning: ‘weights.dim[0].lbound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9062:49: 9062 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9069:24: 9069 | weights=weights_ | ^ Warning: ‘weights.dim[0].ubound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9062:49: 9062 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9069:24: 9069 | weights=weights_ | ^ Warning: ‘weights.dim[0].ubound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9062:49: 9062 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9069:24: 9069 | weights=weights_ | ^ Warning: ‘weights.dim[0].lbound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9062:49: 9062 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here 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 noborder_profiles.o -c noborder_profiles.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 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 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 nostreamlines.o -c nostreamlines.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 noshock.o -c noshock.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 nolorenz_gauge.o -c nolorenz_gauge.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 nosignal_handling.o -c nosignal_handling.f90 noborder_profiles.f90:114:30: 114 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] noshock.f90:182:31: 182 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] grid.f90:1346:24: 1346 | elseif (ncoarse>nz/nghost) then | 1 Warning: Integer division truncated to constant ‘10’ at (1) [-Winteger-division] grid.f90:1346:24: 1346 | elseif (ncoarse>nz/nghost) then | 1 Warning: Integer division truncated to constant ‘10’ at (1) [-Winteger-division] grid.f90:1347:18: 1347 | ncoarse=nz/nghost | 1 Warning: Integer division truncated to constant ‘10’ 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 nofixed_point.o -c nofixed_point.f90 grid.f90:2316:35: 2316 | character(len=linelen) :: msg | 1 Warning: Unused variable ‘msg’ declared at (1) [-Wunused-variable] grid.f90:1537:29: 1537 | 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:4538:40: 4538 | real, dimension (nx,ny,nz) :: a_im | 1 Warning: Array ‘a_im’ 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] 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:3859:36: 3859 | integer :: nmax, nsum, nmin, i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] diagnostics.f90:3859:33: 3859 | integer :: nmax, nsum, nmin, i | 1 Warning: Unused variable ‘nmin’ declared at (1) [-Wunused-variable] diagnostics.f90:2185:24: 2185 | integer :: iname,i,isum | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] diagnostics.f90:2185:29: 2185 | integer :: iname,i,isum | 1 Warning: Unused variable ‘isum’ declared at (1) [-Wunused-variable] diagnostics.f90:1383:68: 1383 | integer function fparse_name(iname,cname,ctest,itest,cform,ncomp) | 1 Warning: Unused dummy argument ‘ncomp’ at (1) [-Wunused-dummy-argument] diagnostics.f90:771:85: 771 | integer :: iname, imax_count, isum_count, nmax_count, nsum_count, itype, maxreq | 1 Warning: Unused variable ‘maxreq’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:513:53: 513 | real, dimension (nygrid,ny,nz) :: tmp_re,tmp_im | 1 Warning: Array ‘tmp_im’ 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] fourier_fftpack.f90:513:46: 513 | real, dimension (nygrid,ny,nz) :: tmp_re,tmp_im | 1 Warning: Array ‘tmp_re’ 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] 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 density_methods.o -c density_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 gravity_simple.o -c gravity_simple.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 nospecial.o -c nospecial.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 magnetic/nomeanfield_demfdt.o -c magnetic/nomeanfield_demfdt.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 noinitial_condition.o -c noinitial_condition.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 noopacity.o -c noopacity.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 notraining.o -c notraining.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 noparticles_main.o -c noparticles_main.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 nostruct_func.o -c nostruct_func.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 notimeavg.o -c notimeavg.f90 notraining.f90:89:31: 89 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] density_methods.f90:343:21: 343 | if (rl <= (nx+1)/2) then | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] noparticles_main.f90:341:29: 341 | type (pencil_case) :: p | 1 Warning: Array ‘p’ 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] nospecial.f90:706:31: 706 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] nospecial.f90:692:41: 692 | subroutine calc_diagnostics_special(f,p) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] nospecial.f90:662:44: 662 | real, dimension(mx,my,mz,mfarray) :: f | 1 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] nospecial.f90:558:79: 558 | subroutine special_calc_spectra_byte(f,spectrum,spectrumhel,lfirstcall,kind,len) | 1 Warning: Unused dummy argument ‘kind’ at (1) [-Wunused-dummy-argument] nospecial.f90:296:43: 296 | subroutine rprint_special(lreset,lwrite) | 1 Warning: Unused dummy argument ‘lwrite’ 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 magnetic/nomeanfield.o -c magnetic/nomeanfield.f90 ar: creating noparticles_main.a gravity_simple.f90:55:33: 55 | real :: xgrav=impossible, ygrav=impossible, zgrav=impossible | 1 Warning: Unused PRIVATE module variable ‘ygrav’ declared at (1) [-Wunused-value] gravity_simple.f90:748:21: 748 | integer :: iter | 1 Warning: Unused variable ‘iter’ declared at (1) [-Wunused-variable] magnetic/nomeanfield.f90:77:39: 77 | subroutine calc_pencils_magn_mf(f,p) | 1 Warning: Unused dummy argument ‘p’ 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 eos_idealgas.o -c eos_idealgas.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 noshear.o -c noshear.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 noghostfold.o -c noghostfold.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 nopoisson.o -c nopoisson.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 nohyperresi_strict.o -c nohyperresi_strict.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 nohypervisc_strict.o -c nohypervisc_strict.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 nopointmasses.o -c nopointmasses.f90 noshear.f90:278:31: 278 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] noshear.f90:265:45: 265 | subroutine shear_frame_transform(a,tshift) | 1 Warning: Unused dummy argument ‘tshift’ at (1) [-Wunused-dummy-argument] eos_idealgas.f90:40:41: 40 | real :: cs0=impossible, cs20=1.0, cs20t, rho0=1., lnrho0=0., rho01=1.0, pp0=1.0 | 1 Warning: Unused PRIVATE module variable ‘cs20t’ declared at (1) [-Wunused-value] eos_idealgas.f90:59:51: 59 | character (len=labellen) :: meanfield_Beq_profile | 1 Warning: Unused PRIVATE module variable ‘meanfield_beq_profile’ declared at (1) [-Wunused-value] eos_idealgas.f90:42:18: 42 | real :: Rgas_cgs=0.0, Rgas, error_cp=1.0e-6 | 1 Warning: Unused PRIVATE module variable ‘rgas_cgs’ declared at (1) [-Wunused-value] eos_dummies.inc:91:37: 91 | logical, pointer :: lmultilayer, lheatc_chiconst, lheatc_kramers, lheatc_Kprof, lheatc_Kconst | 1 Warning: Unused variable ‘lmultilayer’ declared at (1) [-Wunused-variable] eos_idealgas.f90:485:32: 485 | subroutine rprint_eos(lreset,lwrite) | 1 Warning: Unused dummy argument ‘lreset’ at (1) [-Wunused-dummy-argument] eos_idealgas.f90:485:39: 485 | subroutine rprint_eos(lreset,lwrite) | 1 Warning: Unused dummy argument ‘lwrite’ at (1) [-Wunused-dummy-argument] eos_idealgas.f90:273:31: 273 | subroutine initialize_eos(f) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] eos_idealgas.f90:1318:37: 1318 | subroutine thermal_energy_hessian(f,ivar_eth,del2lneth,hlneth) | ^ Warning: ‘thermal_energy_hessian’ defined but not used [-Wunused-function] eos_idealgas.f90:1350:25: 1350 | subroutine eosperturb(f,psize,ee,pp,ss) | ^ Warning: ‘eosperturb’ defined but not used [-Wunused-function] eos_idealgas.f90:2011:28: 2011 | subroutine bdry_magnetic(f,quench,task) | ^ Warning: ‘bdry_magnetic’ defined but not used [-Wunused-function] eos_dummies.inc:228:30: 228 | subroutine write_thermodyn | ^ Warning: ‘write_thermodyn’ defined but not used [-Wunused-function] eos_dummies.inc:234:29: 234 | subroutine read_thermodyn(input_file) | ^ Warning: ‘read_thermodyn’ defined but not used [-Wunused-function] eos_dummies.inc:244:27: 244 | subroutine read_species(input_file) | ^ Warning: ‘read_species’ defined but not used [-Wunused-function] eos_dummies.inc:254:33: 254 | subroutine find_species_index(species_name,ind_glob,ind_chem,found_specie) | ^ Warning: ‘find_species_index’ defined but not used [-Wunused-function] eos_dummies.inc:270:24: 270 | 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 boundcond.o -c boundcond.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 initcond.o -c initcond.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 nointerstellar.o -c nointerstellar.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 noheatflux.o -c noheatflux.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 noselfgravity.o -c noselfgravity.f90 nointerstellar.f90:250:31: 250 | subroutine pushpars2c(p_par) | 1 Warning: Dummy argument ‘p_par’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] noheatflux.f90:167:31: 167 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] nointerstellar.f90:219:23: 219 | subroutine check_SN(f) | ^ Warning: ‘check_sn’ defined but not used [-Wunused-function] nointerstellar.f90:242:26: 242 | subroutine addmassflux(f) | ^ Warning: ‘addmassflux’ defined but not used [-Wunused-function] noselfgravity.f90:169:31: 169 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] initcond.f90:7323:30: 7323 | do icpu=nprocy+1,ncpus | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] initcond.f90:7251:30: 7251 | do icpu=nprocy+1,ncpus | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] initcond.f90:6902:29: 6902 | do pz = 1, nprocz-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] initcond.f90:5187:24: 5187 | 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:5187:54: 5187 | 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:5191:24: 5191 | 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:5191:54: 5191 | 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:5195:24: 5195 | 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:5195:54: 5195 | 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:5076:29: 5076 | k2x = cshift((/(i-(nx+1)/2,i=0,nx-1)/),+(nx+1)/2)*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5076:51: 5076 | k2x = cshift((/(i-(nx+1)/2,i=0,nx-1)/),+(nx+1)/2)*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5079:29: 5079 | 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:5079:51: 5079 | 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:5082:29: 5082 | k2z = cshift((/(i-(nz+1)/2,i=0,nz-1)/),+(nz+1)/2)*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:5082:51: 5082 | k2z = cshift((/(i-(nz+1)/2,i=0,nz-1)/),+(nz+1)/2)*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] initcond.f90:7925:42: 7925 | 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:6197:63: 6197 | 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:6201:44: 6201 | real, dimension (:), allocatable :: kk | 1 Warning: Unused variable ‘kk’ declared at (1) [-Wunused-variable] initcond.f90:6197:67: 6197 | 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:2569:17: 2569 | real :: kx1, ky1, kz1 | 1 Warning: Unused variable ‘kx1’ declared at (1) [-Wunused-variable] initcond.f90:2569:22: 2569 | real :: kx1, ky1, kz1 | 1 Warning: Unused variable ‘ky1’ declared at (1) [-Wunused-variable] initcond.f90:2569:27: 2569 | real :: kx1, ky1, kz1 | 1 Warning: Unused variable ‘kz1’ declared at (1) [-Wunused-variable] initcond.f90:1867:47: 1867 | subroutine beltramik_general(ampl,f,i,kx,ky,kz,phase) | 1 Warning: Unused dummy argument ‘ky’ at (1) [-Wunused-dummy-argument] initcond.f90:1867:50: 1867 | subroutine beltramik_general(ampl,f,i,kx,ky,kz,phase) | 1 Warning: Unused dummy argument ‘kz’ at (1) [-Wunused-dummy-argument] boundcond.f90:9304:25: 9304 | do j=1,nprocx-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] boundcond.f90:9327:27: 9327 | do j=1,nprocx-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] boundcond.f90:2046:23: 2046 | cjvar=itoa(j) | 1 Warning: CHARACTER expression will be truncated in assignment (3/21) at (1) [-Wcharacter-truncation] boundcond.f90:1948:23: 1948 | cjvar=itoa(j) | 1 Warning: CHARACTER expression will be truncated in assignment (3/21) at (1) [-Wcharacter-truncation] boundcond.f90:1841:25: 1841 | cjvar=itoa(j) | 1 Warning: CHARACTER expression will be truncated in assignment (3/21) at (1) [-Wcharacter-truncation] boundcond.f90:705:32: 705 | real :: XXi, XXi0, tau_XXi | 1 Warning: Unused variable ‘tau_xxi’ declared at (1) [-Wunused-variable] boundcond.f90:705:17: 705 | real :: XXi, XXi0, tau_XXi | 1 Warning: Unused variable ‘xxi’ declared at (1) [-Wunused-variable] boundcond.f90:705:23: 705 | real :: XXi, XXi0, tau_XXi | 1 Warning: Unused variable ‘xxi0’ declared at (1) [-Wunused-variable] boundcond.f90:3458:30: 3458 | subroutine bc_stratified_z(f,topbot,j) | ^ Warning: ‘bc_stratified_z’ defined but not used [-Wunused-function] boundcond.f90:5169:33: 5169 | subroutine bc_onesided_z_orig(f,topbot,j) | ^ Warning: ‘bc_onesided_z_orig’ defined but not used [-Wunused-function] boundcond.f90:7199:51: 7199 | tmp_yz=Ftop/(work_yz*Krho1kr_yz*tmp_yz) | ^ Warning: ‘ftop’ may be used uninitialized [-Wmaybe-uninitialized] 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 nochemistry.o -c nochemistry.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 nochiral.o -c nochiral.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 nocosmicray.o -c nocosmicray.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 noneutraldensity.o -c noneutraldensity.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 nopolymer.o -c nopolymer.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 noradiation.o -c noradiation.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 noascalar.o -c noascalar.f90 nocosmicray.f90:196:31: 196 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] nochiral.f90:189:31: 189 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] nochemistry.f90:26:28: 26 | logical :: lchemistry_diag=.false. | 1 Warning: Unused PRIVATE module variable ‘lchemistry_diag’ declared at (1) [-Wunused-value] nochemistry.f90:348:51: 348 | subroutine cond_spec_cond_lagr(f,df,p,rp,ix0,ix,np_swarm,dapdt) | 1 Warning: Unused dummy argument ‘ix’ at (1) [-Wunused-dummy-argument] nochemistry.f90:348:60: 348 | subroutine cond_spec_cond_lagr(f,df,p,rp,ix0,ix,np_swarm,dapdt) | 1 Warning: Unused dummy argument ‘np_swarm’ at (1) [-Wunused-dummy-argument] nochemistry.f90:348:44: 348 | subroutine cond_spec_cond_lagr(f,df,p,rp,ix0,ix,np_swarm,dapdt) | 1 Warning: Unused dummy argument ‘rp’ at (1) [-Wunused-dummy-argument] nochemistry.f90:292:63: 292 | subroutine find_species_index(species_name,ind_glob,ind_chem,found_specie) | 1 Warning: Unused dummy argument ‘ind_chem’ at (1) [-Wunused-dummy-argument] nochemistry.f90:292:45: 292 | subroutine find_species_index(species_name,ind_glob,ind_chem,found_specie) | 1 Warning: Unused dummy argument ‘species_name’ at (1) [-Wunused-dummy-argument] nochemistry.f90:221:30: 221 | subroutine get_cs2_slice(f,slice,index,dir) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] nochemistry.f90:209:32: 209 | subroutine get_gamma_slice(f,slice,index,dir) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] nochemistry.f90:197:30: 197 | subroutine get_mu1_slice(f,slice,grad_slice,index,sgn,direction) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] nochemistry.f90:181:44: 181 | subroutine write_chemistry_run_pars(unit) | 1 Warning: Unused dummy argument ‘unit’ at (1) [-Wunused-dummy-argument] nochemistry.f90:165:45: 165 | subroutine write_chemistry_init_pars(unit) | 1 Warning: Unused dummy argument ‘unit’ 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 nocosmicrayflux.o -c nocosmicrayflux.f90 noneutraldensity.f90:179:31: 179 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] nopolymer.f90:182:31: 182 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ 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 noneutralvelocity.o -c noneutralvelocity.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 nolsode_for_chemistry.o -c nolsode_for_chemistry.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 nopscalar.o -c nopscalar.f90 noneutralvelocity.f90:176:31: 176 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] nopscalar.f90:206:31: 206 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ 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 filter.o -c filter.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 noNSCBC.o -c noNSCBC.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 density.o -c density.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 nodetonate.o -c nodetonate.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 viscosity.o -c viscosity.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 noSGS_hydro.o -c noSGS_hydro.f90 filter.f90:152:24: 152 | subroutine rmwig_old(f,df,ivar,explog) | ^ Warning: ‘rmwig_old’ defined but not used [-Wunused-function] filter.f90:285:32: 285 | subroutine rmwig_lnxyaverage(f,ivar) | ^ Warning: ‘rmwig_lnxyaverage’ defined but not used [-Wunused-function] noSGS_hydro.f90:138:37: 138 | subroutine calc_SGS_hydro_force(f,df,p) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] noSGS_hydro.f90:74:40: 74 | subroutine pencil_criteria_SGS_hydro | ^ Warning: ‘pencil_criteria_sgs_hydro’ defined but not used [-Wunused-function] noSGS_hydro.f90:82:40: 82 | subroutine pencil_interdep_SGS_hydro(lpencil_in) | ^ Warning: ‘pencil_interdep_sgs_hydro’ defined but not used [-Wunused-function] noSGS_hydro.f90:94:37: 94 | subroutine calc_pencils_SGS_hydro(f,p) | ^ Warning: ‘calc_pencils_sgs_hydro’ defined but not used [-Wunused-function] noSGS_hydro.f90:123:34: 123 | subroutine calc_SGS_hydro_heat(df,p,Hmax) | ^ Warning: ‘calc_sgs_hydro_heat’ defined but not used [-Wunused-function] viscosity.f90:241:45: 241 | integer, dimension(nvisc_max) :: enum_ivisc= 0 | 1 Warning: Unused PRIVATE module variable ‘enum_ivisc’ declared at (1) [-Wunused-value] viscosity.f90:118:22: 118 | logical :: lKit_Olem | 1 Warning: Unused PRIVATE module variable ‘lkit_olem’ declared at (1) [-Wunused-value] viscosity.f90:35:26: 35 | real :: zeta=0.0, nu_mol=0.0, nu_hyper2=0.0, nu_hyper3=0.0 | 1 Warning: Unused PRIVATE module variable ‘nu_mol’ declared at (1) [-Wunused-value] viscosity.f90:44:36: 44 | real :: offamp_lambda=1.,r1_lambda=impossible,r2_lambda=impossible | 1 Warning: Unused PRIVATE module variable ‘r1_lambda’ declared at (1) [-Wunused-value] viscosity.f90:44:57: 44 | real :: offamp_lambda=1.,r1_lambda=impossible,r2_lambda=impossible | 1 Warning: Unused PRIVATE module variable ‘r2_lambda’ declared at (1) [-Wunused-value] viscosity.f90:2951:59: 2951 | subroutine get_viscosity_implicit(ndc, diffus_coeff, iz) | 1 Warning: Unused dummy argument ‘iz’ at (1) [-Wunused-dummy-argument] viscosity.f90:2891:18: 2891 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] density.f90:80:16: 80 | real :: co1_ss=0.0, co2_ss=0.0, Sigma1=150.0 | 1 Warning: Unused PRIVATE module variable ‘co1_ss’ declared at (1) [-Wunused-value] density.f90:80:28: 80 | real :: co1_ss=0.0, co2_ss=0.0, Sigma1=150.0 | 1 Warning: Unused PRIVATE module variable ‘co2_ss’ declared at (1) [-Wunused-value] density.f90:302:30: 302 | integer :: enum_div_sld_dens = 0 | 1 Warning: Unused PRIVATE module variable ‘enum_div_sld_dens’ declared at (1) [-Wunused-value] density.f90:78:31: 78 | real :: eps_planet=0.5, q_ell=5.0, hh0=0.0 | 1 Warning: Unused PRIVATE module variable ‘q_ell’ declared at (1) [-Wunused-value] density.f90:80:40: 80 | real :: co1_ss=0.0, co2_ss=0.0, Sigma1=150.0 | 1 Warning: Unused PRIVATE module variable ‘sigma1’ declared at (1) [-Wunused-value] density.f90:94:33: 94 | real :: mass_cloud=0.0, T_cloud=0.0, T_cloud_out_rel=1.0, xi_coeff=1.0 | 1 Warning: Unused PRIVATE module variable ‘t_cloud’ declared at (1) [-Wunused-value] density.f90:94:68: 94 | real :: mass_cloud=0.0, T_cloud=0.0, T_cloud_out_rel=1.0, xi_coeff=1.0 | 1 Warning: Unused PRIVATE module variable ‘xi_coeff’ declared at (1) [-Wunused-value] density.f90:2336:46: 2336 | subroutine calc_pencils_linear_density_std(f,p) | ^ Warning: ‘calc_pencils_linear_density_std’ defined but not used [-Wunused-function] density.f90:4012:37: 4012 | subroutine update_reference_state | ^ Warning: ‘update_reference_state’ 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 nodustvelocity.o -c nodustvelocity.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 entropy.o -c entropy.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 noforcing.o -c noforcing.f90 nodustvelocity.f90:167:31: 167 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ 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 nodustdensity.o -c nodustdensity.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 nomagnetic.o -c nomagnetic.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 hydro.o -c hydro.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 power_spectrum.o -c power_spectrum.f90 ar: creating magnetic.a power_spectrum.f90:6580:37: 6580 | filename_h5 = filename//'.h5' | 1 Warning: CHARACTER expression will be truncated in assignment (135/138) at (1) [-Wcharacter-truncation] power_spectrum.f90:5981:14: 5981 | kxx = kx(ikx+ipx*nx) ! the true kx | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] power_spectrum.f90:5982:14: 5982 | kyy = ky(iky+ipy*ny) ! the true ky | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] power_spectrum.f90:5983:14: 5983 | kzz = kz(ikz+ipz*nz) ! the true kz | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] power_spectrum.f90:542:13: 542 | k2=get_k2(ikx+ipx*nx, iky+ipy*ny, ikz+ipz*nz) | 1 Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1) [-Wconversion] power_spectrum.f90:244:22: 244 | kx=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] power_spectrum.f90:244:52: 244 | kx=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] power_spectrum.f90:245:22: 245 | ky=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] power_spectrum.f90:245:52: 245 | ky=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] power_spectrum.f90:246:22: 246 | kz=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] power_spectrum.f90:246:52: 246 | kz=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] entropy.f90:99:28: 99 | integer :: nsmooth_kramers=0 | 1 Warning: Unused PRIVATE module variable ‘nsmooth_kramers’ declared at (1) [-Wunused-value] entropy.f90:106:46: 106 | real :: wpatch=0.0, amp_patch=1.0, patch_fac=1.0, coolfac=0.0 | 1 Warning: Unused PRIVATE module variable ‘patch_fac’ declared at (1) [-Wunused-value] entropy.f90:60:28: 60 | real :: thermal_background=0.0, thermal_peak=0.0, thermal_scaling=1.0 | 1 Warning: Unused PRIVATE module variable ‘thermal_background’ declared at (1) [-Wunused-value] entropy.f90:60:67: 60 | real :: thermal_background=0.0, thermal_peak=0.0, thermal_scaling=1.0 | 1 Warning: Unused PRIVATE module variable ‘thermal_scaling’ declared at (1) [-Wunused-value] entropy.f90:171:14: 171 | real :: xmid | 1 Warning: Unused PRIVATE module variable ‘xmid’ declared at (1) [-Wunused-value] power_spectrum.f90:86:33: 86 | real, dimension(nx,ny,nz) :: a2 | 1 Warning: Unused PRIVATE module variable ‘a2’ declared at (1) [-Wunused-value] power_spectrum.f90:86:33: 86 | real, dimension(nx,ny,nz) :: a2 | 1 Warning: Array ‘a2’ 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] power_spectrum.f90:84:40: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘a_im’ 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] power_spectrum.f90:84:35: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘a_re’ 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] power_spectrum.f90:85:50: 85 | real, dimension(nx,ny,nz,3) :: a_vec_re,a_vec_im, b_vec_re | 1 Warning: Unused PRIVATE module variable ‘a_vec_im’ declared at (1) [-Wunused-value] power_spectrum.f90:85:50: 85 | real, dimension(nx,ny,nz,3) :: a_vec_re,a_vec_im, b_vec_re | 1 Warning: Array ‘a_vec_im’ 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] power_spectrum.f90:85:41: 85 | real, dimension(nx,ny,nz,3) :: a_vec_re,a_vec_im, b_vec_re | 1 Warning: Array ‘a_vec_re’ 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] power_spectrum.f90:84:50: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘b_im’ 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] power_spectrum.f90:84:45: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘b_re’ 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] power_spectrum.f90:85:60: 85 | real, dimension(nx,ny,nz,3) :: a_vec_re,a_vec_im, b_vec_re | 1 Warning: Array ‘b_vec_re’ 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] power_spectrum.f90:84:60: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘c_im’ 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] power_spectrum.f90:84:55: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘c_re’ 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] power_spectrum.f90:84:70: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘d_im’ 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] power_spectrum.f90:84:65: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘d_re’ 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] power_spectrum.f90:84:80: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘h_im’ 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] power_spectrum.f90:84:75: 84 | real, dimension(nx,ny,nz) :: a_re,a_im,b_re,b_im,c_re,c_im,d_re,d_im,h_re,h_im | 1 Warning: Array ‘h_re’ 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] power_spectrum.f90:41:56: 41 | real :: pdfy_max=30., pdfy_min=-30., pdfy_max_logscale=3.0, pdfy_min_logscale=-3. | 1 Warning: Unused PRIVATE module variable ‘pdfy_max_logscale’ declared at (1) [-Wunused-value] power_spectrum.f90:41:79: 41 | real :: pdfy_max=30., pdfy_min=-30., pdfy_max_logscale=3.0, pdfy_min_logscale=-3. | 1 Warning: Unused PRIVATE module variable ‘pdfy_min_logscale’ declared at (1) [-Wunused-value] power_spectrum.f90:6255:16: 6255 | integer :: i,ikx,iky,ikz,k | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:6068:22: 6068 | integer :: ncomp,i,ivec,ikx,iky,ikz,jkx,jky,jkz | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] entropy.f90:6662:39: 6662 | real, dimension (nx) :: heat,prof | 1 Warning: Unused variable ‘prof’ declared at (1) [-Wunused-variable] power_spectrum.f90:5788:16: 5788 | integer :: i, ikx, iky, ikz, im, in, ivec, ikr | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] entropy.f90:6492:18: 6492 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5516:16: 5516 | integer :: i,ivec,ikx,iky,ikz,jkx,jkz,k | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5179:16: 5179 | integer :: i, k, ikx, iky, ikz, jkz, ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5174:8: 5174 | use Chiral, only: iXX_chiral, iYY_chiral | 1 Warning: Unused module variable ‘ixx_chiral’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:5174:8: 5174 | use Chiral, only: iXX_chiral, iYY_chiral | 1 Warning: Unused module variable ‘iyy_chiral’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:5021:16: 5021 | integer :: i, ikx, iky, ikz, im, in, ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5021:35: 5021 | integer :: i, ikx, iky, ikz, im, in, ivec | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:5021:39: 5021 | integer :: i, ikx, iky, ikz, im, in, ivec | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:5018:8: 5018 | use Chiral, only: iXX_chiral, iYY_chiral, iXX2_chiral, iYY2_chiral | 1 Warning: Unused module variable ‘ixx2_chiral’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:5018:8: 5018 | use Chiral, only: iXX_chiral, iYY_chiral, iXX2_chiral, iYY2_chiral | 1 Warning: Unused module variable ‘ixx_chiral’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:5018:8: 5018 | use Chiral, only: iXX_chiral, iYY_chiral, iXX2_chiral, iYY2_chiral | 1 Warning: Unused module variable ‘iyy2_chiral’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:5018:8: 5018 | use Chiral, only: iXX_chiral, iYY_chiral, iXX2_chiral, iYY2_chiral | 1 Warning: Unused module variable ‘iyy_chiral’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:4541:47: 4541 | integer :: i, ikx, iky, ikz, ivec, jvec, im, in | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:4541:51: 4541 | integer :: i, ikx, iky, ikz, ivec, jvec, im, in | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] entropy.f90:4390:40: 4390 | real, dimension (mx,my,mz) :: cs2p, ruzp | 1 Warning: Array ‘cs2p’ 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] entropy.f90:4393:50: 4393 | real, dimension (ncool_patch_max) :: dxpatch, dypatch | 1 Warning: Unused variable ‘dxpatch’ declared at (1) [-Wunused-variable] entropy.f90:4393:59: 4393 | real, dimension (ncool_patch_max) :: dxpatch, dypatch | 1 Warning: Unused variable ‘dypatch’ declared at (1) [-Wunused-variable] entropy.f90:4384:10: 4384 | use Mpicomm, only: mpiallreduce_sum, mpibcast_real_arr, MPI_COMM_PENCIL | 1 Warning: Unused module variable ‘mpi_comm_pencil’ which has been explicitly imported at (1) [-Wunused-variable] entropy.f90:4395:28: 4395 | integer :: l,m,n,lf,nn | 1 Warning: Unused variable ‘nn’ declared at (1) [-Wunused-variable] entropy.f90:4390:46: 4390 | real, dimension (mx,my,mz) :: cs2p, ruzp | 1 Warning: Array ‘ruzp’ 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] power_spectrum.f90:4430:16: 4430 | integer :: i,k,ikx,iky,ikz,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:4288:21: 4288 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:4288:24: 4288 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:4117:21: 4117 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:4117:24: 4117 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:3982:16: 3982 | integer :: i,ivec,ikx,iky,ikz,kr,ipdf | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:3855:47: 3855 | real, dimension (nx,3) :: grad1, grad2, gcc | 1 Warning: Unused variable ‘gcc’ declared at (1) [-Wunused-variable] power_spectrum.f90:3856:40: 3856 | real, dimension (nx) :: pdf_var,gcc2, pdfy_var | 1 Warning: Unused variable ‘gcc2’ declared at (1) [-Wunused-variable] power_spectrum.f90:3855:35: 3855 | real, dimension (nx,3) :: grad1, grad2, gcc | 1 Warning: Unused variable ‘grad1’ declared at (1) [-Wunused-variable] power_spectrum.f90:3855:42: 3855 | real, dimension (nx,3) :: grad1, grad2, gcc | 1 Warning: Unused variable ‘grad2’ declared at (1) [-Wunused-variable] power_spectrum.f90:3851:38: 3851 | integer :: l, i_pdf, i_pdfy, ichem | 1 Warning: Unused variable ‘ichem’ declared at (1) [-Wunused-variable] power_spectrum.f90:3865:32: 3865 | integer, pointer :: ispecial | 1 Warning: Unused variable ‘ispecial’ declared at (1) [-Wunused-variable] power_spectrum.f90:3473:26: 3473 | integer :: ix,iy,iz,im,in,ikx,iky,ikz,nc | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:3473:29: 3473 | integer :: ix,iy,iz,im,in,ikx,iky,ikz,nc | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:3141:16: 3141 | integer :: i,k,ikx,iky,ikz, ivec, im, in, ia0 | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:3141:40: 3141 | integer :: i,k,ikx,iky,ikz, ivec, im, in, ia0 | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:3141:44: 3141 | integer :: i,k,ikx,iky,ikz, ivec, im, in, ia0 | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:2851:16: 2851 | integer :: i,k,ikx,iky,ikz | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2653:39: 2653 | real, dimension (mx,my,mz,3) :: Adv, Str, BBB | 1 Warning: Array ‘adv’ 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] power_spectrum.f90:2653:49: 2653 | real, dimension (mx,my,mz,3) :: Adv, Str, BBB | 1 Warning: Array ‘bbb’ 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] power_spectrum.f90:2650:16: 2650 | integer :: i,k,ikx,iky,ikz,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2653:44: 2653 | real, dimension (mx,my,mz,3) :: Adv, Str, BBB | 1 Warning: Array ‘str’ 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] power_spectrum.f90:2453:16: 2453 | integer :: i,k,ikx,iky,ikz,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2249:16: 2249 | integer :: i,k,ikx,iky,ikz,ivec, stat | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2252:38: 2252 | real, dimension(mx,my,mz,3) :: Lor | 1 Warning: Array ‘lor’ 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] power_spectrum.f90:1986:16: 1986 | integer :: i, k, ikx, iky, ikz, ivec, stat | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:1989:38: 1989 | real, dimension(mx,my,mz,3) :: Lor | 1 Warning: Array ‘lor’ 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] power_spectrum.f90:1310:30: 1310 | real, dimension(nx) :: bbi, jji, b2, j2 | 1 Warning: Unused variable ‘bbi’ declared at (1) [-Wunused-variable] power_spectrum.f90:1314:44: 1314 | real, save, dimension(nx,ny,nz,3) :: bEP, hEP | 1 Warning: Unused variable ‘bep’ declared at (1) [-Wunused-variable] power_spectrum.f90:1307:16: 1307 | integer :: i, k, ikx, iky, ikz, jkz, im, in, ivec, ivec_jj | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:664:16: 664 | integer :: i,k,ikx,iky,ikz,im,in,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:664:33: 664 | integer :: i,k,ikx,iky,ikz,im,in,ivec | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:664:36: 664 | integer :: i,k,ikx,iky,ikz,im,in,ivec | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:663:48: 663 | real, dimension(nk) :: spectrum,spectrum_sum | 1 Warning: Unused variable ‘spectrum_sum’ declared at (1) [-Wunused-variable] power_spectrum.f90:583:16: 583 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:583:22: 583 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘ikx’ declared at (1) [-Wunused-variable] power_spectrum.f90:583:26: 583 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘iky’ declared at (1) [-Wunused-variable] power_spectrum.f90:583:30: 583 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘ikz’ declared at (1) [-Wunused-variable] power_spectrum.f90:583:33: 583 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:583:36: 583 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:583:18: 583 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] power_spectrum.f90:585:14: 585 | real :: k2 | 1 Warning: Unused variable ‘k2’ declared at (1) [-Wunused-variable] power_spectrum.f90:110:8: 110 | use Fourier, only: kx_fft, ky_fft, kz_fft | 1 Warning: Unused module variable ‘kx_fft’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:110:8: 110 | use Fourier, only: kx_fft, ky_fft, kz_fft | 1 Warning: Unused module variable ‘ky_fft’ which has been explicitly imported at (1) [-Wunused-variable] power_spectrum.f90:110:8: 110 | use Fourier, only: kx_fft, ky_fft, kz_fft | 1 Warning: Unused module variable ‘kz_fft’ which has been explicitly imported at (1) [-Wunused-variable] hydro.f90:142:45: 142 | logical :: luuk_as_aux=.false., look_as_aux=.false. | 1 Warning: Unused PRIVATE module variable ‘look_as_aux’ declared at (1) [-Wunused-value] hydro.f90:142:24: 142 | logical :: luuk_as_aux=.false., look_as_aux=.false. | 1 Warning: Unused PRIVATE module variable ‘luuk_as_aux’ declared at (1) [-Wunused-value] hydro.f90:909:46: 909 | real, dimension (nx) :: prof_amp1, prof_amp2 | 1 Warning: Unused PRIVATE module variable ‘prof_amp2’ declared at (1) [-Wunused-value] hydro.f90:112:19: 112 | real :: u_out_kep=0.0, velocity_ceiling=.0, w_sldchar_hyd=1.0 | 1 Warning: Unused PRIVATE module variable ‘u_out_kep’ declared at (1) [-Wunused-value] hydro.f90:218:45: 218 | real :: width_ff_uu=1.,x1_ff_uu=0.,x2_ff_uu=0. | 1 Warning: Unused PRIVATE module variable ‘x2_ff_uu’ declared at (1) [-Wunused-value] entropy.f90:7580:34: 7580 | subroutine calc_heatcond_zprof(zprof_hcond,zprof_glhc) | ^ Warning: ‘calc_heatcond_zprof’ defined but not used [-Wunused-function] power_spectrum.f90:2233:25: 2233 | subroutine powerLor_OLD(f,sp) | ^ Warning: ‘powerlor_old’ defined but not used [-Wunused-function] hydro.f90:3349:26: 3349 | integer :: i_4_49_50, j_4_49_50 | 1 Warning: Unused variable ‘i_4_49_50’ declared at (1) [-Wunused-variable] hydro.f90:3349:37: 3349 | integer :: i_4_49_50, j_4_49_50 | 1 Warning: Unused variable ‘j_4_49_50’ declared at (1) [-Wunused-variable] hydro.f90:6161:39: 6161 | subroutine coriolis_spherical_del2p(f,p) | ^ Warning: ‘coriolis_spherical_del2p’ defined but not used [-Wunused-function] hydro.f90:6252:41: 6252 | subroutine coriolis_cylindrical_del2p(f,p) | ^ Warning: ‘coriolis_cylindrical_del2p’ defined but not used [-Wunused-function] hydro.f90:7730:4: 7730 | function decomp_prepare() result (ldecomp) | ^ Warning: ‘decomp_prepare’ 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 noimplicit_physics.o -c noimplicit_physics.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 notestfield.o -c notestfield.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 notestflow.o -c notestflow.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 notestscalar.o -c notestscalar.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 persist.o -c persist.f90 notestfield.f90:122:41: 122 | subroutine calc_diagnostics_testfield(f,p) | ^ Warning: ‘calc_diagnostics_testfield’ 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 slices.o -c slices.f90 slices.f90:232:36: 232 | lwrite_slice_yz=(ipx==nprocx/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:240:36: 240 | lwrite_slice_xy=(ipz==nprocz/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:276:37: 276 | lwrite_slice_xy2=(ipz==nprocz/4); if (lwrite_slice_xy2) iz2_loc=n2 | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:313:36: 313 | lwrite_slice_yz=(ipx==nprocx/2); if (lwrite_slice_yz) ix_loc=(l1+l2)/2 | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:315:37: 315 | lwrite_slice_xy2=(ipz==nprocz/4) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:459:21: 459 | if (ipz<=nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:459:21: 459 | if (ipz<=nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:468:21: 468 | elseif (ipz>=2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:468:21: 468 | elseif (ipz>=2*nprocz/3) then | 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 -std=f2003 -o snapshot.o -c snapshot.f90 slices.f90:450:34: 450 | subroutine prep_xy_slice(izloc) | 1 Warning: Unused dummy argument ‘izloc’ at (1) [-Wunused-dummy-argument] slices.f90:450:28: 450 | subroutine prep_xy_slice(izloc) | ^ Warning: ‘prep_xy_slice’ defined but not used [-Wunused-function] snapshot.f90:1266:38: 1266 | real, dimension (nx*ny*nz) :: xx, yy, zz | 1 Warning: Array ‘xx’ 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] snapshot.f90:1266:42: 1266 | real, dimension (nx*ny*nz) :: xx, yy, zz | 1 Warning: Array ‘yy’ 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] snapshot.f90:1266:46: 1266 | real, dimension (nx*ny*nz) :: xx, yy, zz | 1 Warning: Array ‘zz’ 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] snapshot.f90:418:41: 418 | subroutine read_predef_snaptimes(file,snaptimes) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] snapshot.f90:294:56: 294 | real, dimension(:), allocatable, save :: snaptimes | 1 Warning: Unused variable ‘snaptimes’ declared at (1) [-Wunused-variable] snapshot.f90:34:33: 34 | subroutine wsnap_down(a,flist) | 1 Warning: Unused dummy argument ‘flist’ at (1) [-Wunused-dummy-argument] snapshot.f90:418:36: 418 | subroutine read_predef_snaptimes(file,snaptimes) | ^ Warning: ‘read_predef_snaptimes’ 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 equ.o -c equ.f90 equ.f90:1777:29: 1777 | subroutine test_rhs_gpu(f,df,p,mass_per_proc,early_finalize,cpu_version) | 1 Warning: Unused dummy argument ‘df’ at (1) [-Wunused-dummy-argument] equ.f90:1693:23: 1693 | real :: dt1_preac | 1 Warning: Unused variable ‘dt1_preac’ declared at (1) [-Wunused-variable] equ.f90:516:37: 516 | subroutine diagnostics_reductions | ^ Warning: ‘diagnostics_reductions’ defined but not used [-Wunused-function] equ.f90:1777:24: 1777 | subroutine test_rhs_gpu(f,df,p,mass_per_proc,early_finalize,cpu_version) | ^ Warning: ‘test_rhs_gpu’ 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 timestep.o -c timestep.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 pencil_check.o -c pencil_check.f90 timestep.f90:319:31: 319 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] timestep.f90:91:47: 91 | real, dimension (mx,my,mz,mvar) :: df_tmp | 1 Warning: Unused variable ‘df_tmp’ 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 param_io.o -c param_io.f90 param_io.f90:80:26: 80 | integer :: niter_poisson ! dummy | 1 Warning: Unused PRIVATE module variable ‘niter_poisson’ declared at (1) [-Wunused-value] 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 register.o -c register.f90 register.f90:174:27: 174 | do aux_count=1,maux | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] 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 start.o -c start.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 run.o -c run.f90 run.f90:1202:62: 1202 | wall_clock_time/icount/(nw+npar/ncpus)/ncpus/1.0e-6 | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] run.f90:624:6: 624 | use Farray_alloc | 1 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] run.f90:670:27: 670 | integer :: helper_core_id | 1 Warning: Unused variable ‘helper_core_id’ declared at (1) [-Wunused-variable] run.f90:668:14: 668 | integer :: i,j | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] run.f90:668:16: 668 | integer :: i,j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] run.f90:669:27: 669 | integer :: master_core_id | 1 Warning: Unused variable ‘master_core_id’ declared at (1) [-Wunused-variable] run.f90:657:25: 657 | type (pencil_case) :: p | 1 Warning: Array ‘p’ 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] run.f90:621:6: 621 | use Diagnostics, only: phiavg_norm, report_undefined_diagnostics, trim_averages,diagnostics_clean_up | 1 Warning: Unused module variable ‘phiavg_norm’ which has been explicitly imported at (1) [-Wunused-variable] run.f90:671:58: 671 | integer, dimension(max_threads_possible) :: tmp_core_ids | 1 Warning: Unused variable ‘tmp_core_ids’ declared at (1) [-Wunused-variable] h5pfc cparam.o cdata.o mpicomm.o noborder_profiles.o boundcond.o nodebug.o debug_io_dist.o deriv.o diagnostics.o nofarray_alloc.o farray.o filter.o nofixed_point.o fourier_fftpack.o general.o geometrical_types.o ghost_check.o noghostfold.o grid.o nogsl.o noimplicit_diffusion.o initcond.o noinitial_condition.o hdf5_io_parallel.o io_hdf5.o file_io_f95.o nolsode_for_chemistry.o messages.o noNSCBC.o param_io.o persist.o power_spectrum.o nopython.o register.o shared_variables.o nosignal_handling.o slices.o slices_methods.o snapshot.o nosolid_cells_mpicomm.o nosolid_cells.o nostreamlines.o nostruct_func.o sub.o syscalls.o syscalls_ansi.o notestperturb.o notimeavg.o noweno_transport.o noyinyang.o noyinyang_mpi.o magnetic.a noparticles_main.a morton_helper.o nochemistry.o nochiral.o nocosmicray.o nocosmicrayflux.o density.o density_methods.o nodetonate.o nodustdensity.o nodustvelocity.o entropy.o eos_idealgas.o noforcing.o gravity_simple.o noheatflux.o hydro.o nohyperresi_strict.o nohypervisc_strict.o noimplicit_physics.o nointerstellar.o nolorenz_gauge.o noneutraldensity.o noneutralvelocity.o noopacity.o nopointmasses.o nopoisson.o nopolymer.o nopscalar.o noradiation.o noselfgravity.o noSGS_hydro.o noshear.o noshock.o nospecial.o noascalar.o notestfield.o notestflow.o notestscalar.o viscosity.o nogpu.o nogpu_astaroth_ansi.o notraining.o start.o -ldl fftpack.o -o start.x h5pfc cparam.o cdata.o mpicomm.o noborder_profiles.o boundcond.o nodebug.o debug_io_dist.o deriv.o diagnostics.o nofarray_alloc.o farray.o filter.o nofixed_point.o fourier_fftpack.o general.o geometrical_types.o ghost_check.o noghostfold.o grid.o nogsl.o noimplicit_diffusion.o initcond.o noinitial_condition.o hdf5_io_parallel.o io_hdf5.o file_io_f95.o nolsode_for_chemistry.o messages.o noNSCBC.o param_io.o persist.o power_spectrum.o nopython.o register.o shared_variables.o nosignal_handling.o slices.o slices_methods.o snapshot.o nosolid_cells_mpicomm.o nosolid_cells.o nostreamlines.o nostruct_func.o sub.o syscalls.o syscalls_ansi.o notestperturb.o notimeavg.o noweno_transport.o noyinyang.o noyinyang_mpi.o magnetic.a noparticles_main.a morton_helper.o nochemistry.o nochiral.o nocosmicray.o nocosmicrayflux.o density.o density_methods.o nodetonate.o nodustdensity.o nodustvelocity.o entropy.o eos_idealgas.o noforcing.o gravity_simple.o noheatflux.o hydro.o nohyperresi_strict.o nohypervisc_strict.o noimplicit_physics.o nointerstellar.o nolorenz_gauge.o noneutraldensity.o noneutralvelocity.o noopacity.o nopointmasses.o nopoisson.o nopolymer.o nopscalar.o noradiation.o noselfgravity.o noSGS_hydro.o noshear.o noshock.o nospecial.o noascalar.o notestfield.o notestflow.o notestscalar.o viscosity.o nogpu.o timestep.o notraining.o equ.o pencil_check.o run.o -ldl fftpack.o -o run.x make[2]: Leaving directory '/home/pencil/full/samples/power_xy/complex_lpowerxyhdf5/nprocy_2/src' ${PENCIL_HOME}/utils/pc_identify_revision --write make[1]: Leaving directory '/home/pencil/full/samples/power_xy/complex_lpowerxyhdf5/nprocy_2/src'