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 ===== make FROM_PARENT=src/ -f Makefile.src code ===== make[1]: Entering directory '/home/pencil/full/samples/advective_gauge/src' Compiler: gfortran GCC version: 11 Makefile.src:2977: 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 noentropy.f90 eos_idealgas.f90 nofixed_point.f90 forcing.f90 nogravity.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 magnetic.f90 magnetic/nomeanfield.f90 magnetic/nomeanfield_demfdt.f90 mpicomm.f90 noneutraldensity.f90 noneutralvelocity.f90 noNSCBC.f90 noopacity.f90 noparticles.f90 noparticles_adaptation.f90 noparticles_coagulation.f90 noparticles_condensation.f90 noparticles_collisions.f90 noparticles_map.f90 noparticles_density.f90 noparticles_mass.f90 noparticles_number.f90 noparticles_radius.f90 noparticles_potential.f90 noparticles_grad.f90 noparticles_selfgravity.f90 noparticles_sink.f90 noparticles_drag.f90 noparticles_spin.f90 noparticles_stalker.f90 noparticles_lyapunov.f90 noparticles_caustics.f90 noparticles_tetrad.f90 noparticles_stirring.f90 noparticles_diagnos_dv.f90 noparticles_diagnos_state.f90 noparticles_persistence.f90 noparticles_temperature.f90 noparticles_adsorbed.f90 noparticles_surfspec.f90 noparticles_chemistry.f90 nopointmasses.f90 poisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 pscalar_nolog.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 special/advective_gauge.f90 make[2]: Entering directory '/home/pencil/full/samples/advective_gauge/src' Compiler: gfortran GCC version: 11 Makefile:2982: GCC version > 9 ==> allowing argument mismatch in mpicomm.f90, noparticles_mpicomm.f90, syscalls.f90 and fftpack.f90. make[2]: Leaving directory '/home/pencil/full/samples/advective_gauge/src' make -f Makefile.src start.o run.o start.x run.x make[2]: Entering directory '/home/pencil/full/samples/advective_gauge/src' Compiler: gfortran GCC version: 11 Makefile.src:2977: 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 noentropy.f90 eos_idealgas.f90 nofixed_point.f90 forcing.f90 nogravity.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 magnetic.f90 magnetic/nomeanfield.f90 magnetic/nomeanfield_demfdt.f90 mpicomm.f90 noneutraldensity.f90 noneutralvelocity.f90 noNSCBC.f90 noopacity.f90 noparticles.f90 noparticles_adaptation.f90 noparticles_coagulation.f90 noparticles_condensation.f90 noparticles_collisions.f90 noparticles_map.f90 noparticles_density.f90 noparticles_mass.f90 noparticles_number.f90 noparticles_radius.f90 noparticles_potential.f90 noparticles_grad.f90 noparticles_selfgravity.f90 noparticles_sink.f90 noparticles_drag.f90 noparticles_spin.f90 noparticles_stalker.f90 noparticles_lyapunov.f90 noparticles_caustics.f90 noparticles_tetrad.f90 noparticles_stirring.f90 noparticles_diagnos_dv.f90 noparticles_diagnos_state.f90 noparticles_persistence.f90 noparticles_temperature.f90 noparticles_adsorbed.f90 noparticles_surfspec.f90 noparticles_chemistry.f90 nopointmasses.f90 poisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 pscalar_nolog.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 special/advective_gauge.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 noentropy.f90 eos_idealgas.f90 nofixed_point.f90 forcing.f90 nogravity.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 magnetic.f90 magnetic/nomeanfield.f90 magnetic/nomeanfield_demfdt.f90 mpicomm.f90 noneutraldensity.f90 noneutralvelocity.f90 noNSCBC.f90 noopacity.f90 noparticles.f90 noparticles_adaptation.f90 noparticles_coagulation.f90 noparticles_condensation.f90 noparticles_collisions.f90 noparticles_map.f90 noparticles_density.f90 noparticles_mass.f90 noparticles_number.f90 noparticles_radius.f90 noparticles_potential.f90 noparticles_grad.f90 noparticles_selfgravity.f90 noparticles_sink.f90 noparticles_drag.f90 noparticles_spin.f90 noparticles_stalker.f90 noparticles_lyapunov.f90 noparticles_caustics.f90 noparticles_tetrad.f90 noparticles_stirring.f90 noparticles_diagnos_dv.f90 noparticles_diagnos_state.f90 noparticles_persistence.f90 noparticles_temperature.f90 noparticles_adsorbed.f90 noparticles_surfspec.f90 noparticles_chemistry.f90 nopointmasses.f90 poisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 pscalar_nolog.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 special/advective_gauge.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o cdata.o -c cdata.f90 cdata.f90:719:21: 719 | 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:719:37: 719 | 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:719:53: 719 | 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:720:22: 720 | 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:720:39: 720 | 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:720:56: 720 | integer :: lpoint2=(mx+1)/4,mpoint2=(my+1)/4,npoint2=(mz+1)/4 | 1 Warning: Integer division truncated to constant ‘5’ at (1) [-Winteger-division] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o general.o -c general.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -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] general.f90:900:33: 900 | real, parameter :: am=1./im | 1 Warning: Change of value in conversion from ‘INTEGER(4)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2975:41: 2975 | DATA Q1,Q2,Q3,Q4,Q5 /.04687499995D0,-.2002690873D-3, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2975:57: 2975 | DATA Q1,Q2,Q3,Q4,Q5 /.04687499995D0,-.2002690873D-3, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2976:20: 2976 | .8449199096D-5,-.88228987D-6,.105787412D-6 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2976:34: 2976 | .8449199096D-5,-.88228987D-6,.105787412D-6 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2976:48: 2976 | .8449199096D-5,-.88228987D-6,.105787412D-6 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2974:54: 2974 | .2457520174D-5,-.240337019D-6 /,P6 /.636619772D0 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2973:42: 2973 | DATA P1,P2,P3,P4,P5 /1.D0,.183105D-2,-.3516396496D-4, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2973:58: 2973 | DATA P1,P2,P3,P4,P5 /1.D0,.183105D-2,-.3516396496D-4, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2974:20: 2974 | .2457520174D-5,-.240337019D-6 /,P6 /.636619772D0 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2974:35: 2974 | .2457520174D-5,-.240337019D-6 /,P6 /.636619772D0 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2936:42: 2936 | DATA Q1,Q2,Q3,Q4,Q5 /-.1562499995D-1,.1430488765D-3, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2936:57: 2936 | DATA Q1,Q2,Q3,Q4,Q5 /-.1562499995D-1,.1430488765D-3, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2937:21: 2937 | -.6911147651D-5,.7621095161D-6,-.9349451520D-7 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2937:36: 2937 | -.6911147651D-5,.7621095161D-6,-.9349451520D-7 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2937:52: 2937 | -.6911147651D-5,.7621095161D-6,-.9349451520D-7 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2934:47: 2934 | DATA P1,P2,P3,P4,P5 /1.D0,-.1098628627D-2,.2734510407D-4, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2934:62: 2934 | DATA P1,P2,P3,P4,P5 /1.D0,-.1098628627D-2,.2734510407D-4, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2935:21: 2935 | -.2073370639D-5,.2093887211D-6 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:2935:36: 2935 | -.2073370639D-5,.2093887211D-6 / | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:6860:8: 6860 | res=sum(arrq) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] general.f90:5599:33: 5599 | thphprime(1,itp,jtp) = datan2(dble(sprime),dble(zprime)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] general.f90:5600:33: 5600 | thphprime(2,itp,jtp) = datan2(dble(yprime),dble(xprime)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] general.f90:3048:14: 3048 | plegendre = pmm | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] general.f90:3055:16: 3055 | plegendre = pmmp1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] general.f90:3068:16: 3068 | plegendre = pll | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] general.f90:1040:31: 1040 | am=nearest(1.0,-1.0)/im | 1 Warning: Change of value in conversion from ‘INTEGER(4)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:986:31: 986 | am=nearest(1.0,-1.0)/im | 1 Warning: Change of value in conversion from ‘INTEGER(4)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:991:31: 991 | am=nearest(1.0,-1.0)/im | 1 Warning: Change of value in conversion from ‘INTEGER(4)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:938:31: 938 | am=nearest(1.0,-1.0)/im | 1 Warning: Change of value in conversion from ‘INTEGER(4)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:943:31: 943 | am=nearest(1.0,-1.0)/im | 1 Warning: Change of value in conversion from ‘INTEGER(4)’ to ‘REAL(4)’ at (1) [-Wconversion] general.f90:7127:35: 7127 | type(two_dim_array_dims) :: dim | 1 Warning: Unused variable ‘dim’ declared at (1) [-Wunused-variable] general.f90:7110:38: 7110 | type(single_dim_array_dims) :: dim | 1 Warning: Unused variable ‘dim’ declared at (1) [-Wunused-variable] general.f90:6743:10: 6743 | use Cdata, only: iproc | 1 Warning: Unused module variable ‘iproc’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5685:10: 5685 | use Cdata, only: iproc, iproc_world | 1 Warning: Unused module variable ‘lroot’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5685:10: 5685 | use Cdata, only: iproc, iproc_world | 1 Warning: Unused module variable ‘lyang’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5622:10: 5622 | use Cdata, only: y, z | 1 Warning: Unused module variable ‘y’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5622:10: 5622 | use Cdata, only: y, z | 1 Warning: Unused module variable ‘z’ which has been explicitly imported at (1) [-Wunused-variable] general.f90:5551:10: 5551 | 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:5551:10: 5551 | 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:5511:10: 5511 | 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:4949:36: 4949 | function rangegen(start,end,step) | 1 Warning: Unused dummy argument ‘step’ at (1) [-Wunused-dummy-argument] general.f90:525:10: 525 | 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:525:10: 525 | 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:498:10: 498 | 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:2087:28: 2087 | subroutine tridag_double(a,b,c,r,u,err) | ^ Warning: ‘tridag_double’ defined but not used [-Wunused-function] general.f90:5371:4: 5371 | function detect_precision_of_binary(file,reclen) result(prec) | ^ Warning: ‘detect_precision_of_binary’ defined but not used [-Wunused-function] general.f90:6390:25: 6390 | 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 -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 -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 -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 -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 -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 -std=f2003 -o notestperturb.o -c notestperturb.f90 nopython.f90:28:41: 28 | subroutine write_python_run_pars(unit) | 1 Warning: Unused dummy argument ‘unit’ at (1) [-Wunused-dummy-argument] 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] 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 -fallow-argument-mismatch -o mpicomm.o -c mpicomm.f90 mpicomm.f90:893:39: 893 | 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:893:39: 893 | 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:899:38: 899 | 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:899:38: 899 | 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:910:56: 910 | 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:910:56: 910 | 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:916:55: 916 | 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:916:55: 916 | 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:922:54: 922 | 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:922:54: 922 | 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:928:55: 928 | 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:928:55: 928 | 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:1210:25: 1210 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1210:38: 1210 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] mpicomm.f90:1210:25: 1210 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1210:38: 1210 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] mpicomm.f90:1299:25: 1299 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1299:38: 1299 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] mpicomm.f90:1299:25: 1299 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:1299:38: 1299 | if (ipz>=nprocz/3.and.ipz<2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] mpicomm.f90:10526:46: 10526 | integer, parameter :: nprocz_rd=nprocz/3 | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] mpicomm.f90:10986:32: 10986 | frgn_setup%t_last_recvd=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] mpicomm.f90:9871:29: 9871 | do px = 1, nprocx-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] mpicomm.f90:3485:11: 3485 | mult=len_array/max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:3486:11: 3486 | 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:3511:11: 3511 | mult=len_array/max_int | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] mpicomm.f90:3512:11: 3512 | 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:2762:13: 2762 | c1*fa(:,m2long-ny-displs+3:m2long-displs+2,:,ivar1:ivar2) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] mpicomm.f90:2771:13: 2771 | c1*fb(:,ny+1+displs-2:2*ny+displs-2,:,ivar1:ivar2) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] mpicomm.f90:2509:15: 2509 | c1*cshift(f(l2i:l2,m1:m2,:,ivar1:ivar2),-displs+2,2) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] mpicomm.f90:2516:15: 2516 | c1*cshift(f(l1:l1i,m1:m2,:,ivar1:ivar2), displs-2,2) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] mpicomm.f90:10928:26: 10928 | call MPI_SCATTERV(src,counts,dspls,mpi_precision,dest,nlocal,mpi_precision,root,MPI_COMM_PENCIL,mpierr) | 1 ...... 10957 | 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(4)/INTEGER(4)). mpicomm.f90:10474:22: 10474 | call MPI_GATHER(flag, 1, MPI_LOGICAL, flags, 1, MPI_LOGICAL, root, MPI_COMM_PENCIL, mpierr) | 1 ...... 10942 | 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:10317:46: 10314 | call MPI_RECV(rowbuf_cmplx, nsend, MPI_CMPLX, ig, tag, ioptest(comm,MPI_COMM_GRID), status, mpierr) | 2 ...... 10317 | 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(4)/COMPLEX(4)). mpicomm.f90:10337:46: 10329 | call MPI_SEND(sendbuf_cmplx(iy,ixa:ixe:ixs,iz,ic), & | 2 ...... 10337 | call MPI_SEND(sendbuf(iy,ixa:ixe:ixs,iz), & | 1 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(4)/COMPLEX(4)). mpicomm.f90:5320:24: 5320 | call MPI_REDUCE(fland_tmp, fland, nreduce, MPI_LOGICAL, MPI_LAND, root,& | 1 ...... 10418 | 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(4)). mpicomm.f90:5094:24: 5094 | call MPI_REDUCE(fsum_tmp, fsum, 1, mpi_precision, MPI_SUM, root, & | 1 ...... 10418 | 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:4959:22: 4959 | call MPI_REDUCE(fmin_tmp, fmin, 1, mpi_precision, MPI_MIN, root, & | 1 ...... 10418 | 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:4887:22: 4887 | call MPI_REDUCE(fmax_tmp, fmax, 1, mpi_precision, MPI_MAX, root, & | 1 ...... 10418 | 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:4876:25: 4876 | call MPI_ALLREDUCE(MPI_IN_PLACE, lor, n, MPI_LOGICAL, MPI_LOR, ioptest(comm,MPI_COMM_GRID), mpierr) | 1 ...... 5589 | 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:4426:21: 4426 | call MPI_BCAST(bcast_array,nbcast_array,MPI_COMPLEX,ibcast_proc, & | 1 ...... 10511 | 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:4146:21: 4146 | call MPI_BCAST(lbcast_array, product(nbcast_array), MPI_LOGICAL, ioptest(proc,root), & | 1 ...... 10511 | 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:4129:21: 4129 | call MPI_BCAST(lbcast_array,nbcast_array,MPI_LOGICAL,ioptest(proc,root), & | 1 ...... 10511 | 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:4080:23: 4080 | call MPI_ISEND(bcast_array, nbcast_array, MPI_INTEGER, proc_rec, & | 1 ...... 6588 | call MPI_ISEND(lbufo,nbuf,mpi_precision, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(4)). mpicomm.f90:3821:21: 3821 | call MPI_IRECV(bcast_array, nbcast_array, MPI_INTEGER, proc_src, & | 1 ...... 6583 | call MPI_IRECV(ubufi,nbuf,mpi_precision, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(4)). mpicomm.f90:3676:24: 3676 | call MPI_SENDRECV(send_array,1,mpi_precision,proc_dest,sendtag, & | 1 ...... 3755 | 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:3661:24: 3661 | call MPI_SENDRECV(send_array,sendcnt,MPI_INTEGER,proc_dest,sendtag, & | 1 ...... 3755 | 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(4)). mpicomm.f90:3156:23: 3156 | call MPI_IRECV(bcast_array, 1, mpi_precision, proc_src, & | 1 ...... 6583 | 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:775:31: 773 | call MPI_Win_create(a, size, 1, MPI_INFO_NULL, MPI_COMM_WORLD, win, mpierr) | 2 774 | else ! hence other ranks do not declare a window 775 | 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:584:41: 584 | call MPI_COMM_SPLIT(MPI_COMM_GRID, ipy+nprocy*ipz, ipx, & | 1 ...... 11712 | 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:233:25: 233 | call MPI_ALLGATHER(ndname,MPI_MAX_PROCESSOR_NAME,MPI_CHARACTER,nodenames,MPI_MAX_PROCESSOR_NAME, & | 1 ...... 3066 | call MPI_ALLGATHER(tau_zx,nx*nz,mpi_precision,tau_zx_all,nx*nz,mpi_precision, & | 2 Warning: Type mismatch between actual argument at (1) and actual argument at (2) (CHARACTER(255)/REAL(4)). mpicomm.f90:280:38: 280 | call MPI_TYPE_SIZE(MPI_INTEGER, size_of_int, mpierr) | 1 ...... 4498 | 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:149:27: 149 | integer :: MIDZ=MID, MIDC=MID | 1 Warning: Unused PRIVATE module variable ‘midc’ declared at (1) [-Wunused-value] mpicomm.f90:10980:25: 10980 | 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:10980:100: 10980 | 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:7591:49: 7591 | integer, dimension(MPI_STATUS_SIZE) :: stat | 1 Warning: Unused variable ‘stat’ declared at (1) [-Wunused-variable] mpicomm.f90:7474:49: 7474 | integer, dimension(MPI_STATUS_SIZE) :: stat | 1 Warning: Unused variable ‘stat’ declared at (1) [-Wunused-variable] mpicomm.f90:6756:45: 6756 | subroutine distribute_yz_3D(out, in, comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:5659:33: 5659 | subroutine transp(a,var, comm, lsync) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:4558:68: 4558 | subroutine mpiallreduce_sum_arr2(fsum_tmp,fsum,nreduce,idir,comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:4533:67: 4533 | subroutine mpiallreduce_sum_arr(fsum_tmp,fsum,nreduce,idir,comm) | 1 Warning: Unused dummy argument ‘comm’ at (1) [-Wunused-dummy-argument] mpicomm.f90:2697:49: 2697 | 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:2697:53: 2697 | 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:2426:38: 2426 | integer :: ivar1, ivar2, nbuf, j, ny_loc, nx_loc, nvar_loc | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:2371:38: 2371 | integer :: ivar1, ivar2, nbuf, j, nx_loc, nz_loc, nvar_loc | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:1526:80: 1526 | integer :: ivar1, ivar2, nbufy, nbufz, nbufyz, mxl, comm, bufact, dir,mm,j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] mpicomm.f90:707:57: 707 | gridbuf_left, & ! ~ of left corner neighbour | 1 Warning: Unused variable ‘gridbuf_left’ declared at (1) [-Wunused-variable] mpicomm.f90:706:57: 706 | 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:706:71: 706 | 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:708:58: 708 | gridbuf_right ! ~ of right corner neighbour | 1 Warning: Unused variable ‘gridbuf_right’ declared at (1) [-Wunused-variable] mpicomm.f90:212:33: 212 | integer :: flag, ndnmlen, i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] mpicomm.f90:700:41: 700 | subroutine set_cubed_sphere_neighbors | ^ Warning: ‘set_cubed_sphere_neighbors’ defined but not used [-Wunused-function] mpicomm.f90:3242:33: 3242 | 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:3452:39: 3452 | 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:3522:39: 3522 | 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:3587:33: 3587 | 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:9916:30: 9916 | 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 -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 -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 -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 -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 -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 -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 -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 -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 -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 -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 -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] debug_io_dist.f90:243:13: 243 | t_sp = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] noimplicit_diffusion.f90:41:51: 41 | subroutine integrate_diffusion(get_diffus_coeff, f, ivar1, ivar2) | 1 Warning: Unused dummy argument ‘get_diffus_coeff’ at (1) [-Wunused-dummy-argument] debug_io_dist.f90:212:13: 212 | t_sp = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] debug_io_dist.f90:153:13: 153 | t_sp = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] debug_io_dist.f90:96:13: 96 | t_sp = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] 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 -std=f2003 -o nogpu.o -c nogpu.f90 nogpu.f90:112:45: 112 | subroutine copy_farray_from_GPU(f,nowait_) | 1 Warning: Unused dummy argument ‘nowait_’ at (1) [-Wunused-dummy-argument] nogpu.f90:70:31: 70 | logical :: early_finalize | 1 Warning: Unused variable ‘early_finalize’ declared at (1) [-Wunused-variable] nogpu.f90:59:31: 59 | logical :: early_finalize | 1 Warning: Unused variable ‘early_finalize’ 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 -std=f2003 -o nohdf5_io.o -c nohdf5_io.f90 nohdf5_io.f90:209:47: 209 | subroutine input_hdf5_3D(name, data, lghost) | 1 Warning: Unused dummy argument ‘lghost’ at (1) [-Wunused-dummy-argument] nohdf5_io.f90:572:35: 572 | subroutine input_slice_position(directory,ix_bc_,iy_bc_,iy2_bc_,iz_bc_,iz2_bc_,iz3_bc_,iz4_bc_) | ^ Warning: ‘input_slice_position’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o farray.o -c farray.f90 farray.f90:544:21: 544 | do i=1,mscratch | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] farray.f90:993:55: 993 | 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 -std=f2003 -o global_pushpars.o -c global_pushpars.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o io_dist.o -c io_dist.f90 io_common.inc:30:25: 30 | procx_bounds=procx_boundsdb; procy_bounds=procy_boundsdb; procz_bounds=procz_boundsdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_common.inc:30:54: 30 | procx_bounds=procx_boundsdb; procy_bounds=procy_boundsdb; procz_bounds=procz_boundsdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_common.inc:30:83: 30 | procx_bounds=procx_boundsdb; procy_bounds=procy_boundsdb; procz_bounds=procz_boundsdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1437:14: 1437 | x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1437:21: 1437 | x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1437:28: 1437 | x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1437:36: 1437 | x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1437:45: 1437 | x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1437:54: 1437 | x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1438:15: 1438 | Lx=Lxdb; Ly=Lydb; Lz=Lzdb; dx_1=dx_1db; dy_1=dy_1db; dz_1=dz_1db | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1438:24: 1438 | Lx=Lxdb; Ly=Lydb; Lz=Lzdb; dx_1=dx_1db; dy_1=dy_1db; dz_1=dz_1db | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1438:33: 1438 | Lx=Lxdb; Ly=Lydb; Lz=Lzdb; dx_1=dx_1db; dy_1=dy_1db; dz_1=dz_1db | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1438:44: 1438 | Lx=Lxdb; Ly=Lydb; Lz=Lzdb; dx_1=dx_1db; dy_1=dy_1db; dz_1=dz_1db | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1438:57: 1438 | Lx=Lxdb; Ly=Lydb; Lz=Lzdb; dx_1=dx_1db; dy_1=dy_1db; dz_1=dz_1db | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1438:70: 1438 | Lx=Lxdb; Ly=Lydb; Lz=Lzdb; dx_1=dx_1db; dy_1=dy_1db; dz_1=dz_1db | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1439:21: 1439 | dx_tilde=dx_tildedb; dy_tilde=dy_tildedb; dz_tilde=dz_tildedb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1439:42: 1439 | dx_tilde=dx_tildedb; dy_tilde=dy_tildedb; dz_tilde=dz_tildedb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1439:63: 1439 | dx_tilde=dx_tildedb; dy_tilde=dy_tildedb; dz_tilde=dz_tildedb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1170:12: 1170 | a=adb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1081:16: 1081 | value=vdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:1051:16: 1051 | value=vdb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.h:257:17: 257 | t_test = t_sp | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.h:278:21: 278 | tstart = t_red | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.h:286:19: 286 | tstart = t_sp | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:12: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:19: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:26: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:33: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:41: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:50: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:59: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:686:72: 686 | a=adb; x=xdb; y=ydb; z=zdb; dx=dxdb; dy=dydb; dz=dzdb; deltay=deltaydb | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:397:13: 397 | t_sp = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:356:13: 356 | t_sp = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] io_dist.f90:164:19: 164 | out_size=nw*bytes | 1 Warning: Possible change of value in conversion from INTEGER(8) to INTEGER(4) at (1) [-Wconversion] io_dist.f90:1111:48: 1111 | subroutine output_globals(file, a, nv, label) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1095:50: 1095 | logical function read_persist_torus_rect(label,value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1064:47: 1064 | logical function read_persist_real_1D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1035:47: 1035 | logical function read_persist_real_0D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1021:46: 1021 | logical function read_persist_int_1D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:1007:46: 1007 | logical function read_persist_int_0D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:993:50: 993 | logical function read_persist_logical_1D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:979:50: 979 | logical function read_persist_logical_0D(label, value) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:932:41: 932 | logical function persist_exists(label) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:874:43: 874 | subroutine input_pointmass(file, labels, fq, mv, nc) | 1 Warning: Unused dummy argument ‘labels’ at (1) [-Wunused-dummy-argument] io_dist.f90:835:72: 835 | subroutine input_part_snap(ipar, ap, mv, nv, npar_total, file, label) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:643:62: 643 | logical function write_persist_torus_rect(label, id, value) | 1 Warning: Unused dummy argument ‘value’ at (1) [-Wunused-dummy-argument] io_dist.f90:511:43: 511 | logical function write_persist_id(label, id) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:456:44: 456 | subroutine output_pointmass(file, labels, fq, mv, nc) | 1 Warning: Unused dummy argument ‘labels’ at (1) [-Wunused-dummy-argument] io_dist.f90:417:38: 417 | character (len=fnlen) :: dataset | 1 Warning: Unused variable ‘dataset’ declared at (1) [-Wunused-variable] io_dist.f90:403:35: 403 | subroutine output_stalker(label, mv, nv, data, nvar, lfinalize) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:381:48: 381 | subroutine output_stalker_init(num, nv, snap, ID) | 1 Warning: Unused dummy argument ‘snap’ at (1) [-Wunused-dummy-argument] io_dist.f90:302:61: 302 | subroutine output_part_snap(ipar, ap, mv, nv, file, label, ltruncate) | 1 Warning: Unused dummy argument ‘label’ at (1) [-Wunused-dummy-argument] io_dist.f90:302:72: 302 | subroutine output_part_snap(ipar, ap, mv, nv, file, label, ltruncate) | 1 Warning: Unused dummy argument ‘ltruncate’ at (1) [-Wunused-dummy-argument] io_dist.f90:126:29: 126 | character (len=6) :: ch | 1 Warning: Unused variable ‘ch’ declared at (1) [-Wunused-variable] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o sub.o -c sub.f90 sub.f90:5980:13: 5980 | coeff1=(/0.66761295020790986D00, & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:5980:15: 5980 | coeff1=(/0.66761295020790986D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5980:38: 5980 | coeff1=(/0.66761295020790986D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5981:38: 5981 | 0.36946093910826145D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5982:38: 5982 | 0.18669829780572704D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5983:37: 5983 | 4.8801451277274492D-2, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5984:38: 5984 | 1.36528684153155468D-2, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5985:37: 5985 | 1.7488042503123817D-3, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5988:13: 5988 | coeff2=(/0.66761295020791116D00, & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:5988:15: 5988 | coeff2=(/0.66761295020791116D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5988:38: 5988 | coeff2=(/0.66761295020791116D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5989:39: 5989 | 0.754817592058897962D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5990:37: 5990 | -3.7915754844972276D-2, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5991:38: 5991 | -0.11379619871302534D00, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5992:37: 5992 | 1.5035521280605477D-2, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:5993:37: 5993 | 3.1375176929984225D-3, & | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] sub.f90:3896:21: 3896 | tout = abs(dtout)+toutoff | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:3900:21: 3900 | tout = t0 + (dble(dtout) - modulo(t0, dble(dtout))) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:3923:13: 3923 | nout = bcast_array(2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] sub.f90:4097:12: 4097 | dt_=tsnap-t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:3968:11: 3968 | t_sp=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:4038:17: 4038 | tout=toutoff+(tout-toutoff)*10.**onesixth | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:394:14: 394 | res=sum(dble(a)) ! sum at double precision to improve accuracy | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:402:14: 402 | res=res+sum(dble(a)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] sub.f90:9369:45: 9369 | integer :: has_nan_local,has_nan_global | 1 Warning: Unused variable ‘has_nan_global’ declared at (1) [-Wunused-variable] sub.f90:9174:50: 9174 | real, save :: lgt_ini, a_ini, Hp_ini, app_om=0 | 1 Warning: Unused variable ‘app_om’ declared at (1) [-Wunused-variable] sub.f90:7826:41: 7826 | 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:7456:17: 7456 | real :: fac | 1 Warning: Unused variable ‘fac’ declared at (1) [-Wunused-variable] sub.f90:7455:18: 7455 | integer :: m,n,j,inde | 1 Warning: Unused variable ‘m’ declared at (1) [-Wunused-variable] sub.f90:7454:55: 7454 | real, allocatable, dimension(:) :: mean, mean_tmp | 1 Warning: Unused variable ‘mean_tmp’ declared at (1) [-Wunused-variable] sub.f90:7455:20: 7455 | integer :: m,n,j,inde | 1 Warning: Unused variable ‘n’ declared at (1) [-Wunused-variable] sub.f90:4132:30: 4132 | subroutine vecout(lun,file,vv,thresh,nvec) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] sub.f90:3071:35: 3071 | 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:3071:42: 3071 | 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:3071:49: 3071 | 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:3071:56: 3071 | 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:3071:63: 3071 | 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:3071:70: 3071 | 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:375:22: 375 | subroutine mean_mn(a,res) | ^ Warning: ‘mean_mn’ defined but not used [-Wunused-function] sub.f90:479:21: 479 | subroutine rms_mn(a,res) | ^ Warning: ‘rms_mn’ defined but not used [-Wunused-function] sub.f90:514:22: 514 | subroutine rms2_mn(a2,res) | ^ Warning: ‘rms2_mn’ defined but not used [-Wunused-function] sub.f90:645:27: 645 | subroutine contract_jk3(a,c) | ^ Warning: ‘contract_jk3’ defined but not used [-Wunused-function] sub.f90:1716:22: 1716 | subroutine der_2nd(f,k,df,j) | ^ Warning: ‘der_2nd’ defined but not used [-Wunused-function] sub.f90:1792:27: 1792 | subroutine der_2nd_stag(f,k,df,j) | ^ Warning: ‘der_2nd_stag’ defined but not used [-Wunused-function] sub.f90:5201:25: 5201 | subroutine nan_inform(f,msg,region,int1,int2,int3,int4,lstop) | ^ Warning: ‘nan_inform’ defined but not used [-Wunused-function] sub.f90:8458:32: 8458 | subroutine calc_lin_interpol(f,j,fim12,fip12,k) | ^ Warning: ‘calc_lin_interpol’ defined but not used [-Wunused-function] sub.f90:9094:24: 9094 | weights=weights_ | ^ Warning: ‘weights.offset’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9087:49: 9087 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9094:24: 9094 | weights=weights_ | ^ Warning: ‘weights.dim[0].lbound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9087:49: 9087 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9094:24: 9094 | weights=weights_ | ^ Warning: ‘weights.dim[0].ubound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9087:49: 9087 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9094:24: 9094 | weights=weights_ | ^ Warning: ‘weights.dim[0].lbound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9087:49: 9087 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9094:24: 9094 | weights=weights_ | ^ Warning: ‘weights.dim[0].ubound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9087:49: 9087 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9094:24: 9094 | weights=weights_ | ^ Warning: ‘weights.dim[0].ubound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9087:49: 9087 | real, dimension(:), allocatable :: weights | ^ note: ‘weights’ declared here sub.f90:9094:24: 9094 | weights=weights_ | ^ Warning: ‘weights.dim[0].lbound’ may be used uninitialized [-Wmaybe-uninitialized] sub.f90:9087:49: 9087 | 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 -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 -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 -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 -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 -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 -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 -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 -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] grid.f90:1390:24: 1390 | elseif (ncoarse>nz/nghost) then | 1 Warning: Integer division truncated to constant ‘5’ at (1) [-Winteger-division] grid.f90:1390:24: 1390 | elseif (ncoarse>nz/nghost) then | 1 Warning: Integer division truncated to constant ‘5’ at (1) [-Winteger-division] grid.f90:1391:18: 1391 | ncoarse=nz/nghost | 1 Warning: Integer division truncated to constant ‘5’ at (1) [-Winteger-division] noshock.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 -std=f2003 -o nofixed_point.o -c nofixed_point.f90 grid.f90:2239:11: 2239 | dxyz(1)*0.5*(xi-delta(1)*log(cosh(dble((xi-xistep(1))/delta(1))))) + & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] grid.f90:2246:14: 2246 | dxyz(1)*0.5*(1.0-tanh(dble((xi-xistep(1))/delta(1))) ) + & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] grid.f90:2254:16: 2254 | + 0.5/delta(1)*(dxyz(2)-dxyz(1))/cosh(dble((xi-xistep(1))/delta(1)))**2 & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] grid.f90:2259:11: 2259 | dxyz(2)*0.5*(xi-delta(2)*log(cosh(dble((xi-xistep(2))/delta(2)))) )+ & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] grid.f90:2264:14: 2264 | dxyz(2)*0.5*(1.0-tanh(dble((xi-xistep(2))/delta(2))) ) + & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] grid.f90:2270:16: 2270 | + 0.5/delta(2)*(dxyz(3)-dxyz(2))/cosh(dble((xi-xistep(2))/delta(2)))**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] grid.f90:2614:35: 2614 | character(len=linelen) :: msg | 1 Warning: Unused variable ‘msg’ declared at (1) [-Wunused-variable] grid.f90:2314:41: 2314 | real, dimension(size(xi,1)) :: arg1,arg2 | 1 Warning: Unused variable ‘arg1’ declared at (1) [-Wunused-variable] grid.f90:2314:46: 2314 | real, dimension(size(xi,1)) :: arg1,arg2 | 1 Warning: Unused variable ‘arg2’ declared at (1) [-Wunused-variable] grid.f90:2061:19: 2061 | real :: alpha, w | 1 Warning: Unused variable ‘alpha’ declared at (1) [-Wunused-variable] grid.f90:2058:61: 2058 | real, dimension(size(xi,1)) :: arg1,arg2,band,dx_ratio | 1 Warning: Unused variable ‘band’ declared at (1) [-Wunused-variable] grid.f90:2057:55: 2057 | real :: ampl,width,deltai,width_cells,delta_cells | 1 Warning: Unused variable ‘delta_cells’ declared at (1) [-Wunused-variable] grid.f90:2058:70: 2058 | real, dimension(size(xi,1)) :: arg1,arg2,band,dx_ratio | 1 Warning: Unused variable ‘dx_ratio’ declared at (1) [-Wunused-variable] grid.f90:2065:18: 2065 | real :: g_mw, g_pw, g_wd ! mapping values at boundaries for continuity | 1 Warning: Unused variable ‘g_mw’ declared at (1) [-Wunused-variable] grid.f90:2065:24: 2065 | real :: g_mw, g_pw, g_wd ! mapping values at boundaries for continuity | 1 Warning: Unused variable ‘g_pw’ declared at (1) [-Wunused-variable] grid.f90:2065:30: 2065 | real :: g_mw, g_pw, g_wd ! mapping values at boundaries for continuity | 1 Warning: Unused variable ‘g_wd’ declared at (1) [-Wunused-variable] grid.f90:2059:18: 2059 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] grid.f90:2064:16: 2064 | real :: sa, sb, sc ! SUS cubic transition variables | 1 Warning: Unused variable ‘sa’ declared at (1) [-Wunused-variable] grid.f90:2064:20: 2064 | real :: sa, sb, sc ! SUS cubic transition variables | 1 Warning: Unused variable ‘sb’ declared at (1) [-Wunused-variable] grid.f90:2064:24: 2064 | real :: sa, sb, sc ! SUS cubic transition variables | 1 Warning: Unused variable ‘sc’ declared at (1) [-Wunused-variable] grid.f90:2061:22: 2061 | real :: alpha, w | 1 Warning: Unused variable ‘w’ declared at (1) [-Wunused-variable] grid.f90:2057:43: 2057 | real :: ampl,width,deltai,width_cells,delta_cells | 1 Warning: Unused variable ‘width_cells’ declared at (1) [-Wunused-variable] grid.f90:2063:16: 2063 | real :: xa ! local shifted coordinate | 1 Warning: Unused variable ‘xa’ declared at (1) [-Wunused-variable] grid.f90:2062:16: 2062 | real :: xc ! center of refined region (from find_star) | 1 Warning: Unused variable ‘xc’ declared at (1) [-Wunused-variable] grid.f90:1581:29: 1581 | 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:4568:43: 4568 | subroutine fourier_shift_y(a_re,shift_y) | 1 Warning: Unused dummy argument ‘shift_y’ at (1) [-Wunused-dummy-argument] fourier_fftpack.f90:1107:45: 1107 | complex, dimension (size(a_re,1)) :: ax | 1 Warning: Unused variable ‘ax’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:1108:48: 1108 | real, dimension (size(a_re,2)) :: deltay_x | 1 Warning: Unused variable ‘deltay_x’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:1109:25: 1109 | integer :: l,m,ibox,nyl | 1 Warning: Unused variable ‘ibox’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:1109:18: 1109 | integer :: l,m,ibox,nyl | 1 Warning: Unused variable ‘l’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:1110:37: 1110 | logical :: lforward,lcompute_im | 1 Warning: Unused variable ‘lcompute_im’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:1110:25: 1110 | logical :: lforward,lcompute_im | 1 Warning: Unused variable ‘lforward’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:1109:20: 1109 | integer :: l,m,ibox,nyl | 1 Warning: Unused variable ‘m’ declared at (1) [-Wunused-variable] fourier_fftpack.f90:1109:29: 1109 | integer :: l,m,ibox,nyl | 1 Warning: Unused variable ‘nyl’ declared at (1) [-Wunused-variable] diagnostics.f90:4105:18: 4105 | tdiagnos = t_save | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:4111:12: 4111 | tspec = tspec_save | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:4058:37: 4058 | if (l1davgfirst) t1ddiagnos_save=t ! (1-D averages are for THIS time) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:4059:38: 4059 | if (l2davgfirst) t2davgfirst_save=t ! (2-D averages are for THIS time) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:4060:33: 4060 | if (lvideo ) tslice_save=t ! (slices are for THIS time) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:4061:33: 4061 | if (lout_sound ) tsound_save=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:1344:28: 1344 | if (ltimer) taver = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:1350:28: 1350 | if (ltimer) taver = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:1362:28: 1362 | if (ltimer) taver = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:1229:28: 1229 | if (ltimer) taver = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:1235:28: 1235 | if (ltimer) taver = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:1241:28: 1241 | if (ltimer) taver = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:1247:28: 1247 | if (ltimer) taver = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] diagnostics.f90:3884:36: 3884 | integer :: nmax, nsum, nmin, i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] diagnostics.f90:3884:33: 3884 | integer :: nmax, nsum, nmin, i | 1 Warning: Unused variable ‘nmin’ declared at (1) [-Wunused-variable] diagnostics.f90:2198:24: 2198 | integer :: iname,i,isum | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] diagnostics.f90:2198:29: 2198 | integer :: iname,i,isum | 1 Warning: Unused variable ‘isum’ declared at (1) [-Wunused-variable] diagnostics.f90:1396:68: 1396 | integer function fparse_name(iname,cname,ctest,itest,cform,ncomp) | 1 Warning: Unused dummy argument ‘ncomp’ at (1) [-Wunused-dummy-argument] diagnostics.f90:776:85: 776 | integer :: iname, imax_count, isum_count, nmax_count, nsum_count, itype, maxreq | 1 Warning: Unused variable ‘maxreq’ declared at (1) [-Wunused-variable] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -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 -std=f2003 -o nogravity.o -c nogravity.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -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 -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 -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 -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 -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 -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 -std=f2003 -o notimeavg.o -c notimeavg.f90 notraining.f90:93:31: 93 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] 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] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o magnetic/nomeanfield.o -c magnetic/nomeanfield.f90 density_methods.f90:343:21: 343 | if (rl <= (nx+1)/2) then | 1 Warning: Integer division truncated to constant ‘16’ at (1) [-Winteger-division] 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 -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 -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 -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 -std=f2003 -o poisson.o -c poisson.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -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 -std=f2003 -o nohypervisc_strict.o -c nohypervisc_strict.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] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o nopointmasses.o -c nopointmasses.f90 eos_idealgas.f90:4455:22: 4455 | density_scale=density_scale_cgs/unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] eos_idealgas.f90:978:22: 978 | p%cs2=cs20*exp(-cs20_tdep_rate*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] eos_idealgas.f90:198:22: 198 | Rgas_unit_sys=k_B_cgs/m_u_cgs | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] eos_idealgas.f90:200:22: 200 | Rgas_unit_sys=k_B_cgs/m_u_cgs*1.0e-4 | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] eos_idealgas.f90:203:24: 203 | Rgas_unit_sys=mu*cp_set | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] eos_idealgas.f90:205:24: 205 | Rgas_unit_sys=mu*gamma_m1*gamma1*cp_set | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] eos_idealgas.f90:221:33: 221 | if (cp==impossible) cp=cp_set | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] eos_idealgas.f90:230:13: 230 | Rgas=Rgas_unit_sys*unit_temperature/unit_velocity**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] eos_idealgas.f90:46:35: 46 | real :: cs20=1.0, cs_t=1.0, cs20t, lnrho0=0., rho01=1.0, pp0=1.0 | 1 Warning: Unused PRIVATE module variable ‘cs20t’ declared at (1) [-Wunused-value] eos_idealgas.f90:66:51: 66 | character (len=labellen) :: meanfield_Beq_profile | 1 Warning: Unused PRIVATE module variable ‘meanfield_beq_profile’ declared at (1) [-Wunused-value] eos_idealgas.f90:48:18: 48 | 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:494:32: 494 | subroutine rprint_eos(lreset,lwrite) | 1 Warning: Unused dummy argument ‘lreset’ at (1) [-Wunused-dummy-argument] eos_idealgas.f90:494:39: 494 | subroutine rprint_eos(lreset,lwrite) | 1 Warning: Unused dummy argument ‘lwrite’ at (1) [-Wunused-dummy-argument] eos_idealgas.f90:282:31: 282 | subroutine initialize_eos(f) | 1 Warning: Unused dummy argument ‘f’ at (1) [-Wunused-dummy-argument] eos_idealgas.f90:1339:37: 1339 | subroutine thermal_energy_hessian(f,ivar_eth,del2lneth,hlneth) | ^ Warning: ‘thermal_energy_hessian’ defined but not used [-Wunused-function] eos_idealgas.f90:1371:25: 1371 | subroutine eosperturb(f,psize,ee,pp,ss) | ^ Warning: ‘eosperturb’ defined but not used [-Wunused-function] eos_idealgas.f90:2032:28: 2032 | 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 -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 -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 -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 -std=f2003 -o noselfgravity.o -c noselfgravity.f90 noselfgravity.f90:25:30: 25 | real :: gravitational_const=G_Newton_cgs | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] 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] 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:177:31: 177 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] noheatflux.f90:167:31: 167 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] initcond.f90:7890:19: 7890 | mass_cloud = (mass_cloud * M_sun) / unit_mass | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7908:18: 7908 | bigr = var1/unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7913:25: 7913 | r_rho(jj) = var1/unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7914:27: 7914 | lnrho_r(jj) = log(var2/unit_density) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7915:29: 7915 | lnTT_file(jj) = log(var3/unit_temperature) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7976:18: 7976 | bigr = var1/unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7977:24: 7977 | lnTTpoint0 = log(var2*temp_coeff/unit_temperature) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7982:25: 7982 | r_rho(jj) = var1/unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7983:27: 7983 | lnrho_r(jj) = log(var2*dens_coeff/unit_density) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:7149:15: 7149 | prof_z = prof_z*1.e6/unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6913:11: 6913 | Bz = Bz * 1e-4 / unit_magnetic | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6917:26: 6917 | Bz_flux_local = sum(abs(Bz)) * dy * unit_magnetic*unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6921:26: 6921 | Bz_flux_local = sum(abs(Bz)) * dx * unit_magnetic*unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6925:26: 6925 | Bz_flux_local = sum(abs(Bz)) * dx*dy * unit_magnetic*unit_length**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6743:20: 6743 | Bzflux = sum(abs(Bz0_r * 1e-4))*dy*unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6746:20: 6746 | Bzflux = sum(abs(Bz0_r * 1e-4))*dx*unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6749:20: 6749 | Bzflux = sum(abs(Bz0_r * 1e-4))*dx*unit_length*dy*unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6755:14: 6755 | Bz0_r = Bz0_r * 1e-4 / unit_magnetic ! Gauss to Tesla and SI to PENCIL units | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:6583:15: 6583 | prof_z = prof_z*1.e6/unit_length | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:5612:24: 5612 | u_re(:,:,:,i)=u_im(:,:,:,i)*cos(-sqrt(k2)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] initcond.f90:5613:24: 5613 | u_im(:,:,:,i)=u_im(:,:,:,i)*sin(-sqrt(k2)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] 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 ‘8’ 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 ‘8’ at (1) [-Winteger-division] initcond.f90:8085:42: 8085 | 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] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o special/advective_gauge.o -c special/advective_gauge.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -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 -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 -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 -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 -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 -std=f2003 -o noascalar.o -c noascalar.f90 noneutraldensity.f90:179:31: 179 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] 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] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o noneutralvelocity.o -c noneutralvelocity.f90 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 -std=f2003 -o nocosmicrayflux.o -c nocosmicrayflux.f90 noneutralvelocity.f90:176:31: 176 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] ../special_dummies.inc:374:44: Warning: Array ‘f’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising] ../special_dummies.inc:270:79: Warning: Unused dummy argument ‘kind’ at (1) [-Wunused-dummy-argument] special/advective_gauge.f90:533:23: 533 | integer :: inamev | 1 Warning: Unused variable ‘inamev’ declared at (1) [-Wunused-variable] special/advective_gauge.f90:238:53: 238 | real, dimension (nx) :: LamRA, tmp, jxa2, del2b, divab2, gLamRAb | 1 Warning: Unused variable ‘del2b’ 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 -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 -std=f2003 -o nochemistry.o -c nochemistry.f90 nochemistry.f90:44:22: 44 | Rgas_unit_sys = k_B_cgs/m_u_cgs | 1 Warning: Change of value in conversion from ‘REAL(8)’ to ‘REAL(4)’ at (1) [-Wconversion] nochemistry.f90:45:13: 45 | Rgas = Rgas_unit_sys/unit_energy | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] 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 -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 -std=f2003 -o pscalar_nolog.o -c pscalar_nolog.f90 pscalar_nolog.f90:784:60: 784 | if (idiag_rhoc2m/=0) call sum_mn_name(p%rho*p%cc(:,2),idiag_rhoc2m) | 1 Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 2 pscalar_nolog.f90:785:60: 785 | if (idiag_rhoc3m/=0) call sum_mn_name(p%rho*p%cc(:,3),idiag_rhoc3m) | 1 Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 2 pscalar_nolog.f90:688:44: 688 | if (lam_gradC/=0.) lam_gradC_fact=exp(lam_gradC*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] pscalar_nolog.f90:689:44: 689 | if ( om_gradC/=0.) om_gradC_fact=cos( om_gradC*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] pscalar_nolog.f90:34:61: 34 | real :: ampllncc=impossible, widthlncc=impossible, lncc_min | 1 Warning: Unused PRIVATE module variable ‘lncc_min’ declared at (1) [-Wunused-value] pscalar_nolog.f90:46:30: 46 | logical :: reinitialize_lncc=.false. | 1 Warning: Unused PRIVATE module variable ‘reinitialize_lncc’ declared at (1) [-Wunused-value] pscalar_nolog.f90:49:43: 49 | character (len=40) :: tensor_pscalar_file | 1 Warning: Unused PRIVATE module variable ‘tensor_pscalar_file’ declared at (1) [-Wunused-value] pscalar_nolog.f90:900:30: 900 | character(len=80) :: fmt | 1 Warning: Unused variable ‘fmt’ declared at (1) [-Wunused-variable] pscalar_nolog.f90:902:18: 902 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] pscalar_nolog.f90:575:34: 575 | real, dimension(nx,3) :: tmp | 1 Warning: Unused variable ‘tmp’ declared at (1) [-Wunused-variable] boundcond.f90:527:23: 527 | last_gettime=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:531:23: 531 | last_gettime=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:9414:25: 9414 | do j=1,nprocx-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] boundcond.f90:9437:27: 9437 | do j=1,nprocx-1 | 1 Warning: DO loop at (1) will be executed zero times [-Wzerotrip] boundcond.f90:9250:23: 9250 | f(:,:,idz,j) = spread(ampl_forc*sin(kx*x)*cos(w_forc*t), 2, size(f,2)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:9252:23: 9252 | f(:,:,idz,j) = spread(ampl_forc*exp(-((x-x_forc)/dx_forc)**2)*cos(w_forc*t), 2, size(f,2)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6790:16: 6790 | time_SI = t*unit_time | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6920:16: 6920 | Bz0_l = Bz0_l * 1e-4 / unit_magnetic | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6921:16: 6921 | Bz0_r = Bz0_r * 1e-4 / unit_magnetic | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6924:17: 6924 | vx_l = vx_l / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6925:17: 6925 | vy_l = vy_l / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6926:17: 6926 | vx_r = vx_r / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6927:17: 6927 | vy_r = vy_r / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6472:25: 6472 | delta_t = t*unit_time ! EOF is reached => read again | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6564:15: 6564 | uxl = uxl / 10. / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6565:15: 6565 | uxr = uxr / 10. / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6566:15: 6566 | uyl = uyl / 10. / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6567:15: 6567 | uyr = uyr / 10. / unit_velocity | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6574:16: 6574 | uxd = (t*unit_time - (tl+delta_t)) * (uxr - uxl) / (tr - tl) + uxl | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6575:16: 6575 | uyd = (t*unit_time - (tl+delta_t)) * (uyr - uyl) / (tr - tl) + uyl | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6190:27: 6190 | f(l1,:,:,iuy) = spread(ampl_forc*sin(k_forc*y)*cos(w_forc*t), 2, size(f,3)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:6204:28: 6204 | f(l2,:,:,iuy) = spread(ampl_forc*sin(k_forc*y)*cos(w_forc*t), 2, size(f,3)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:5895:18: 5895 | tau = (t-tfade_start) / (tdamp-tfade_start) - 0.5 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:4925:12: 4925 | bc_st=XXi0*(1.-(1.+t/tau_XXi)*exp(-t/tau_XXi)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:4036:12: 4036 | lbc=Udrift_bc*t*dx_1(1)+1. | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:4050:12: 4050 | lbc=Udrift_bc*t*dx_1(1)+1. | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:2097:23: 2097 | cjvar=itoa(j) | 1 Warning: CHARACTER expression will be truncated in assignment (3/21) at (1) [-Wcharacter-truncation] boundcond.f90:2012:23: 2012 | cjvar=itoa(j) | 1 Warning: CHARACTER expression will be truncated in assignment (3/21) at (1) [-Wcharacter-truncation] boundcond.f90:1918:25: 1918 | cjvar=itoa(j) | 1 Warning: CHARACTER expression will be truncated in assignment (3/21) at (1) [-Wcharacter-truncation] boundcond.f90:596:23: 596 | last_gettime=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:605:26: 605 | last_gettime(j)=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:611:25: 611 | if (.not.lget) w = (t-last_gettime(j))/timediff | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:558:23: 558 | last_gettime=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:562:23: 562 | last_gettime=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] boundcond.f90:2080:37: 2080 | type (boundary_condition) :: bc | 1 Warning: Unused variable ‘bc’ declared at (1) [-Wunused-variable] boundcond.f90:1995:37: 1995 | type (boundary_condition) :: bc | 1 Warning: Unused variable ‘bc’ declared at (1) [-Wunused-variable] boundcond.f90:1899:37: 1899 | type (boundary_condition) :: bc | 1 Warning: Unused variable ‘bc’ declared at (1) [-Wunused-variable] boundcond.f90:1430:10: 1430 | use Gravity, only: gravz_profile | 1 Warning: Unused module variable ‘gravz_profile’ which has been explicitly imported at (1) [-Wunused-variable] boundcond.f90:718:32: 718 | real :: XXi, XXi0, tau_XXi | 1 Warning: Unused variable ‘tau_xxi’ declared at (1) [-Wunused-variable] boundcond.f90:718:17: 718 | real :: XXi, XXi0, tau_XXi | 1 Warning: Unused variable ‘xxi’ declared at (1) [-Wunused-variable] boundcond.f90:718:23: 718 | real :: XXi, XXi0, tau_XXi | 1 Warning: Unused variable ‘xxi0’ declared at (1) [-Wunused-variable] boundcond.f90:3497:30: 3497 | subroutine bc_stratified_z(f,topbot,j) | ^ Warning: ‘bc_stratified_z’ defined but not used [-Wunused-function] boundcond.f90:5208:33: 5208 | subroutine bc_onesided_z_orig(f,topbot,j) | ^ Warning: ‘bc_onesided_z_orig’ defined but not used [-Wunused-function] boundcond.f90:7243:51: 7243 | 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 -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 -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 -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 -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 -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 -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:243:45: 243 | integer, dimension(nvisc_max) :: enum_ivisc= 0 | 1 Warning: Unused PRIVATE module variable ‘enum_ivisc’ declared at (1) [-Wunused-value] viscosity.f90:120:22: 120 | 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:2991:59: 2991 | subroutine get_viscosity_implicit(ndc, diffus_coeff, iz) | 1 Warning: Unused dummy argument ‘iz’ at (1) [-Wunused-dummy-argument] viscosity.f90:2931:18: 2931 | integer :: i | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] density.f90:3628:21: 3628 | dlnrhodt=fprofile*cos(mass_source_omega*t)*tmp | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] density.f90:3630:21: 3630 | dlnrhodt=fprofile*cos(mass_source_omega*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] density.f90:2565:18: 2565 | p%rho=p%rho-eps_hless*max(0.d0, min(1.d0, (p%hless+0.5d0*width_hless_absolute-t)/width_hless_absolute)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] density.f90:82:16: 82 | 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:82:28: 82 | 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:337:30: 337 | integer :: enum_div_sld_dens = 0 | 1 Warning: Unused PRIVATE module variable ‘enum_div_sld_dens’ declared at (1) [-Wunused-value] density.f90:80:31: 80 | 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:82:40: 82 | 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:96:33: 96 | 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:96:68: 96 | 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:2441:46: 2441 | subroutine calc_pencils_linear_density_std(f,p) | ^ Warning: ‘calc_pencils_linear_density_std’ defined but not used [-Wunused-function] density.f90:4120:37: 4120 | 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 -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 -std=f2003 -o noentropy.o -c noentropy.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o forcing.o -c forcing.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 -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 -std=f2003 -o noimplicit_physics.o -c noimplicit_physics.f90 forcing.f90:5859:23: 5859 | force(:,1)=fact*(ABC_C(i)*(sin(kf_fcont(i)*z(n) +omega_ff *t) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5863:23: 5863 | force(:,2)=fact*(ABC_A(i)*(sin(kf_fcont(i)*x(l1:l2)+omega_ff *t) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5867:23: 5867 | force(:,3)=fact*(ABC_B(i)*(sin(kf_fcont(i)*y(m) +omega_ff *t) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5873:19: 5873 | fact=fact*(cos(omega_ff*t)+cos(omega_double_ff*t)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5875:19: 5875 | fact=fact*(cos(omega_ff*t)+cos(omega_double_ff*t))**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5906:21: 5906 | force(:,3)=gravz*ampl_ff(i)*cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5909:23: 5909 | force(:,1)=-x(l1:l2)*y(m)*ampl_ff(i)*cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5910:23: 5910 | force(:,2)=x(l1:l2)*ampl_ff(i)*cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5913:23: 5913 | force(:,1)=z(n)*ampl_ff(i)*cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5915:23: 5915 | force(:,3)=-x(l1:l2)*ampl_ff(i)*cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5935:17: 5935 | fact=fact*(cos(omega_ff*t)+cos(omega_double_ff*t)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5937:17: 5937 | fact=fact*(cos(omega_ff*t)+cos(omega_double_ff*t))**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6074:17: 6074 | fact=.5*ampl_ff(i)*(1.-cos(pi*t/tgentle(i))) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6114:21: 6114 | force(:,2)=ampl_ff(i)*sinx(l1:l2,i)*sin(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6202:16: 6202 | ecost=eps_fcont(i)*cos(omega_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6203:16: 6203 | esint=eps_fcont(i)*sin(omega_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6294:18: 6294 | kdotxwt=KS_k(1,modeN)*x(l1:l2)+(KS_k(2,modeN)*y(m)+KS_k(3,modeN)*z(n))+KS_omega(modeN)*t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6327:21: 6327 | force(:,1) = ampl_ff(i) * ( & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6331:21: 6331 | force(:,2) = ampl_ff(i) * ( & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:6335:21: 6335 | force(:,3) = ampl_ff(i) * ( & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5485:23: 5485 | phi1_ff(:,i)=cos(kf_fcont(i)*y+omega_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5486:23: 5486 | phi2_ff(:,i)=cos(kf_fcont(i)*x-omega_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5488:16: 5488 | ecost=eps_fcont(i)*cos(omega_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5489:16: 5489 | esint=eps_fcont(i)*sin(omega_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5430:23: 5430 | sinxt(:,i) = sinxt(:,i) + k*( knorm**(-beta_GP) ) * sin( k*(x-xi +cos(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5431:23: 5431 | cosxt(:,i) = cosxt(:,i) + k*( knorm**(-beta_GP) ) * cos( k*(x-xi +cos(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5432:23: 5432 | sinyt(:,i) = sinyt(:,i) + k*( knorm**(-beta_GP) ) * sin( k*(y-eta+sin(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5433:23: 5433 | cosyt(:,i) = sinyt(:,i) + k*( knorm**(-beta_GP) ) * cos( k*(y-eta+sin(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5435:23: 5435 | sinzt(:,i) = sinzt(:,i) + k*( knorm**(-beta_GP) ) * sin( k*(z-xi +cos(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5436:23: 5436 | coszt(:,i) = coszt(:,i) + k*( knorm**(-beta_GP) ) * cos( k*(z-xi +cos(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5437:23: 5437 | sinxt(:,i) = sinxt(:,i) + k*( knorm**(-beta_GP) ) * sin( k*(x-eta+sin(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5438:23: 5438 | cosxt(:,i) = sinxt(:,i) + k*( knorm**(-beta_GP) ) * cos( k*(x-eta+sin(omega*t) ) ) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5499:16: 5499 | ecoxt=eps_fcont(i)*cos( omega_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5500:16: 5500 | ecoyt=eps_fcont(i)*cos(omegay_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5501:16: 5501 | ecozt=eps_fcont(i)*cos(omegaz_fcont(i)*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5092:20: 5092 | dist3 = sqrt( (R0_tidal*cos(omega_tidal*t)*cos(phi_tidal)-x(l))**2 + & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5095:34: 5095 | forcing_rhs(l-l1+1,1)=rho1(l)*fact*(R0_tidal*cos(omega_tidal*t)*cos(phi_tidal)-x(l))/dist3 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5096:34: 5096 | forcing_rhs(l-l1+1,2)=rho1(l)*fact*(R0_tidal*sin(omega_tidal*t)-y(m))/dist3 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:5097:34: 5097 | forcing_rhs(l-l1+1,3)=rho1(l)*fact*(R0_tidal*cos(omega_tidal*t)*sin(phi_tidal)-z(n))/dist3 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4963:16: 4963 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4966:10: 4966 | ik1=nk*.9999*fran1(2)+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4971:10: 4971 | ik2=nk*.9999*fran2(2)+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4978:15: 4978 | p_weight=(tsforce-t)/dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4897:20: 4897 | t_next_blob=t+1. !MR: why +1? | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4922:22: 4922 | t_next_blob=t+scaled_interval | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4924:22: 4924 | t_next_blob=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4393:9: 4393 | ik=nk*.9999*fran(2)+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4396:9: 4396 | kx=kkx(ik) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4397:9: 4397 | ky=kky(ik) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4398:9: 4398 | kz=kkz(ik) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4440:10: 4440 | kex=ky*ez-kz*ey | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4441:10: 4441 | key=kz*ex-kx*ez | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4442:10: 4442 | kez=kx*ey-ky*ex | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4097:16: 4097 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4114:18: 4114 | force_tmp=force_ampl*sin(pi*(tsforce-t)/dtforce)**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3871:16: 3871 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3882:18: 3882 | force_tmp=force_ampl*sin(pi*(tsforce-t)/dtforce)**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3479:11: 3479 | cost=cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3480:11: 3480 | sint=sin(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3407:11: 3407 | cost=cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3408:11: 3408 | sint=sin(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3268:12: 3268 | emm = cklist(lmindex,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:3269:18: 3269 | Legendrel = cklist(lmindex,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:3138:12: 3138 | emm = cklist(lmindex,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:3139:18: 3139 | Legendrel = cklist(lmindex,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:2936:9: 2936 | ik=nk*(.9999*fran(2))+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:2504:9: 2504 | ik=nk*(.9999*fran(2))+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:2842:23: 2842 | coef1(1)=cmplx(k*kex,sig*kkex) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] forcing.f90:2843:23: 2843 | coef1(2)=cmplx(k*key,sig*kkey) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] forcing.f90:2844:23: 2844 | coef1(3)=cmplx(k*kez,sig*kkez) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] forcing.f90:2137:16: 2137 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2148:15: 2148 | aforce=sin( pi*(tsforce-t)/dtforce)**2*dtforce_ampl+(1.-dtforce_ampl) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2149:15: 2149 | pforce=cos(.5*pi*(tsforce-t)/dtforce)**2*aforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2150:15: 2150 | qforce=sin(.5*pi*(tsforce-t)/dtforce)**2*aforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2214:35: 2214 | forcing_rhs(:,j) = force_ampl*fda(j)*cos(omega_ff*t) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2220:41: 2220 | forcing_rhs_old(:,j) = force_ampl*fda_old(j)*cos(omega_ff*t) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2226:38: 2226 | forcing_rhs2(:,j) = force_ampl*fda2(j)*cos(omega_ff*t) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2229:44: 2229 | forcing_rhs2_old(:,j) = force_ampl*fda2_old(j)*cos(omega_ff*t) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2236:37: 2236 | forcing_rhs(:,j) = (1.-qdouble_profile(n))*forcing_rhs(:,j) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2241:43: 2241 | forcing_rhs_old(:,j) = (1.-qdouble_profile(n))*forcing_rhs_old(:,j) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2286:26: 2286 | tmp=max(0d0,1d0+min(0d0,(tforce_ramp_down-t)/tauforce_ramp_down)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:1805:13: 1805 | ik=nk*(.9999*fran(2))+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1570:11: 1570 | ik=nk*(.9999*fran(2))+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1412:12: 1412 | iran1=random2d_nmodes*(.9999*fran(3))+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1413:12: 1413 | iran2=random2d_nmodes*(.9999*fran(4))+1 | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1420:12: 1420 | kx1=random2d_kmodes(1,iran1)*scale_kvectorx | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1421:12: 1421 | ky1=random2d_kmodes(2,iran1)*scale_kvectory | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1422:12: 1422 | kx2=random2d_kmodes(1,iran2)*scale_kvectorx | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1423:12: 1423 | ky2=random2d_kmodes(2,iran2)*scale_kvectory | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1426:12: 1426 | kx1=random2d_kmodes(1,iran1)*(2.*pi/Lxyz(1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1427:12: 1427 | ky1=random2d_kmodes(2,iran1)*(2.*pi/Lxyz(2)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1428:12: 1428 | kx2=random2d_kmodes(1,iran2)*(2.*pi/Lxyz(1)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1429:12: 1429 | ky2=random2d_kmodes(2,iran2)*(2.*pi/Lxyz(2)) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:946:18: 946 | emm = cklist(ilist,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:947:24: 947 | Legendrel = cklist(ilist,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1008:18: 1008 | emm = cklist(ilist,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:1009:24: 1009 | Legendrel = cklist(ilist,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:205:24: 205 | integer :: idiag_fxbxm=0 | 1 Warning: Unused PRIVATE module variable ‘idiag_fxbxm’ declared at (1) [-Wunused-value] forcing.f90:206:24: 206 | integer :: idiag_fxbym=0 | 1 Warning: Unused PRIVATE module variable ‘idiag_fxbym’ declared at (1) [-Wunused-value] forcing.f90:207:24: 207 | integer :: idiag_fxbzm=0 | 1 Warning: Unused PRIVATE module variable ‘idiag_fxbzm’ declared at (1) [-Wunused-value] forcing.f90:124:90: 124 | real, dimension(n_forcing_cont_max) :: ampl_ff=1., ampl1_ff=0., width_fcont=1., x1_fcont=0., x2_fcont=0. | 1 Warning: Unused PRIVATE module variable ‘x1_fcont’ declared at (1) [-Wunused-value] forcing.f90:124:103: 124 | real, dimension(n_forcing_cont_max) :: ampl_ff=1., ampl1_ff=0., width_fcont=1., x1_fcont=0., x2_fcont=0. | 1 Warning: Unused PRIVATE module variable ‘x2_fcont’ declared at (1) [-Wunused-value] forcing.f90:6376:35: 6376 | real, dimension (nx,3) :: fxb | 1 Warning: Unused variable ‘fxb’ declared at (1) [-Wunused-variable] forcing.f90:5842:21: 5842 | integer :: i2d1,i2d2,i2d3,modeN | 1 Warning: Unused variable ‘i2d1’ declared at (1) [-Wunused-variable] forcing.f90:5842:26: 5842 | integer :: i2d1,i2d2,i2d3,modeN | 1 Warning: Unused variable ‘i2d2’ declared at (1) [-Wunused-variable] forcing.f90:5842:31: 5842 | integer :: i2d1,i2d2,i2d3,modeN | 1 Warning: Unused variable ‘i2d3’ declared at (1) [-Wunused-variable] forcing.f90:5819:40: 5819 | subroutine forcing_cont(i,force,rho1) | 1 Warning: Unused dummy argument ‘rho1’ at (1) [-Wunused-dummy-argument] forcing.f90:5056:34: 5056 | real, dimension (nx,3) :: bb,fxb | 1 Warning: Unused variable ‘bb’ declared at (1) [-Wunused-variable] forcing.f90:5056:38: 5056 | real, dimension (nx,3) :: bb,fxb | 1 Warning: Unused variable ‘fxb’ declared at (1) [-Wunused-variable] forcing.f90:5057:18: 5057 | integer :: j,jf,l | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:5057:21: 5057 | integer :: j,jf,l | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:4944:47: 4944 | real, dimension (mx,my,mz,3) :: force_vec | 1 Warning: Array ‘force_vec’ 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] forcing.f90:4950:27: 4950 | integer :: ik1,ik2,ik | 1 Warning: Unused variable ‘ik’ declared at (1) [-Wunused-variable] forcing.f90:4887:34: 4887 | character (len=intlen) :: ch | 1 Warning: Unused variable ‘ch’ declared at (1) [-Wunused-variable] forcing.f90:4888:35: 4888 | character (len=fnlen) :: file | 1 Warning: Unused variable ‘file’ declared at (1) [-Wunused-variable] forcing.f90:4886:23: 4886 | logical :: lforce | 1 Warning: Unused variable ‘lforce’ declared at (1) [-Wunused-variable] forcing.f90:3624:69: 3624 | real, dimension (nx,3) :: variable_rhs,forcing_rhs,force_all,bb,fxb | 1 Warning: Unused variable ‘bb’ declared at (1) [-Wunused-variable] forcing.f90:3624:73: 3624 | real, dimension (nx,3) :: variable_rhs,forcing_rhs,force_all,bb,fxb | 1 Warning: Unused variable ‘fxb’ declared at (1) [-Wunused-variable] forcing.f90:3629:18: 3629 | integer :: j,jf | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3629:21: 3629 | integer :: j,jf | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3473:18: 3473 | integer :: j,jf | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3473:21: 3473 | integer :: j,jf | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3401:18: 3401 | integer :: j,jf | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3401:21: 3401 | integer :: j,jf | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3251:24: 3251 | integer :: emm,l,j,jf,Legendrel,lmindex,aindex,ell_rand,raindex | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3251:27: 3251 | integer :: emm,l,j,jf,Legendrel,lmindex,aindex,ell_rand,raindex | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3253:38: 3253 | real :: rz,rindex,ralpha,rphase2,thphase,sthphase,cthphase,costhprime,phprime,alphap,& | 1 Warning: Unused variable ‘rphase2’ declared at (1) [-Wunused-variable] forcing.f90:3253:16: 3253 | real :: rz,rindex,ralpha,rphase2,thphase,sthphase,cthphase,costhprime,phprime,alphap,& | 1 Warning: Unused variable ‘rz’ declared at (1) [-Wunused-variable] forcing.f90:3256:33: 3256 | real, dimension(nx) :: Smod | 1 Warning: Unused variable ‘smod’ declared at (1) [-Wunused-variable] forcing.f90:2928:22: 2928 | integer :: jtest | 1 Warning: Unused variable ‘jtest’ declared at (1) [-Wunused-variable] forcing.f90:2485:44: 2485 | real, dimension (nx,3) :: fda,uu,oo,bb,fxb,curlo | 1 Warning: Unused variable ‘bb’ declared at (1) [-Wunused-variable] forcing.f90:2485:48: 2485 | real, dimension (nx,3) :: fda,uu,oo,bb,fxb,curlo | 1 Warning: Unused variable ‘fxb’ declared at (1) [-Wunused-variable] forcing.f90:1992:35: 1992 | subroutine fxyz_coefs_hel(coef1,coef2,coef3,kk,phase,fact,fx,fy,fz) | 1 Warning: Unused dummy argument ‘coef1’ at (1) [-Wunused-dummy-argument] forcing.f90:1992:41: 1992 | subroutine fxyz_coefs_hel(coef1,coef2,coef3,kk,phase,fact,fx,fy,fz) | 1 Warning: Unused dummy argument ‘coef2’ at (1) [-Wunused-dummy-argument] forcing.f90:1992:47: 1992 | subroutine fxyz_coefs_hel(coef1,coef2,coef3,kk,phase,fact,fx,fy,fz) | 1 Warning: Unused dummy argument ‘coef3’ at (1) [-Wunused-dummy-argument] forcing.f90:277:97: 277 | real :: zstar,rmin,rmax,a_ell,anum,adenom,jlm_ff,ylm_ff,alphar,Balpha,RYlm,IYlm,intv_rotang | 1 Warning: Unused variable ‘intv_rotang’ declared at (1) [-Wunused-variable] forcing.f90:4363:34: 4363 | subroutine forcing_hel_noshear(f) | ^ Warning: ‘forcing_hel_noshear’ defined but not used [-Wunused-function] forcing.f90:4551:30: 4551 | subroutine forcing_roberts(f) | ^ Warning: ‘forcing_roberts’ defined but not used [-Wunused-function] forcing.f90:5600:40: 5600 | subroutine random_isotropic_KS_setup(initpower,kmin,kmax) | ^ Warning: ‘random_isotropic_ks_setup’ 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 -std=f2003 -o magnetic.o -c magnetic.f90 magnetic.f90:11729:16: 11729 | c = cos(omega_Bz_ext * t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:11730:16: 11730 | s = sin(omega_Bz_ext * t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:11742:19: 11742 | zposbot=zbot_moving_layer + t*speed_moving_layer | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:11743:19: 11743 | zpostop=ztop_moving_layer + t*speed_moving_layer | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:11778:24: 11778 | B_ext_out = B0_ext + 0.5*(1.-cos(pi*(t-t0_bext)/(t_bext-t0_bext)))*(B_ext_out-B0_ext) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:9487:27: 9487 | f(l1:l2,m,n,iuu+0)=f(l1:l2,m,n,iuu+0)+ampl*fac/(4*kz)*sin(kz*z(n)) | 1 Warning: Possible change of value in conversion from COMPLEX(4) to REAL(4) at (1) [-Wconversion] magnetic.f90:8133:21: 8133 | taareset=t+daareset | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:6194:14: 6194 | tmp1=mu01/(numag*(B0_magfric/unit_magnetic**2+p%b2)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:4304:22: 4304 | p%bb(:,1) = p%bb(:,1) + dipole_moment*2*(c*costh(m) + s*sinth(m)*cos(z(n)-omega_Bz_ext*t))*p%r_mn1**3 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:4305:22: 4305 | p%bb(:,2) = p%bb(:,2) + dipole_moment* (c*sinth(m) - s*costh(m)*cos(z(n)-omega_Bz_ext*t))*p%r_mn1**3 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:4306:22: 4306 | p%bb(:,3) = p%bb(:,3) + dipole_moment* ( s* sin(z(n)-omega_Bz_ext*t))*p%r_mn1**3 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:4873:13: 4873 | tmp1=mu01/(numag*(B0_magfric/unit_magnetic**2+p%b2)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:4935:23: 4935 | p%clight2 = max(dble(cmin)**2,c_light**2/(1.+max(z(n),0.0)**8)+max(25.0*maxval(p%u2),maxval(p%cs2))) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:1571:17: 1571 | c_light2=c_light**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:92:46: 92 | real, dimension (:,:,:,:), allocatable :: ap | 1 Warning: Unused PRIVATE module variable ‘ap’ declared at (1) [-Wunused-value] magnetic.f90:165:52: 165 | real :: kpeak_aa=10., kgaussian_aa=0., brms_target=1.0, rescaling_fraction=1.0 | 1 Warning: Unused PRIVATE module variable ‘brms_target’ declared at (1) [-Wunused-value] magnetic.f90:173:14: 173 | real :: damp=0., two_step_factor=1. | 1 Warning: Unused PRIVATE module variable ‘damp’ declared at (1) [-Wunused-value] magnetic.f90:1167:30: 1167 | integer :: enum_div_sld_magn = 0 | 1 Warning: Unused PRIVATE module variable ‘enum_div_sld_magn’ declared at (1) [-Wunused-value] magnetic.f90:113:39: 113 | integer :: nzav=0,indzav=0,izav_start=1 | 1 Warning: Unused PRIVATE module variable ‘izav_start’ declared at (1) [-Wunused-value] magnetic.f90:329:28: 329 | real :: k1x_ff=1.0, k1y_ff=1.0, k1z_ff=1.0 | 1 Warning: Unused PRIVATE module variable ‘k1y_ff’ declared at (1) [-Wunused-value] magnetic.f90:254:25: 254 | logical :: lbeta_as_aux=.false. | 1 Warning: Unused PRIVATE module variable ‘lbeta_as_aux’ declared at (1) [-Wunused-value] magnetic.f90:269:23: 269 | logical :: lbraginsky=.false., l2d_aa=.false. | 1 Warning: Unused PRIVATE module variable ‘lbraginsky’ declared at (1) [-Wunused-value] magnetic.f90:355:30: 355 | logical :: lelectron_inertia=.false. | 1 Warning: Unused PRIVATE module variable ‘lelectron_inertia’ declared at (1) [-Wunused-value] magnetic.f90:156:14: 156 | real :: mu_r=-0.5 !(still needed for backwards compatibility) | 1 Warning: Unused PRIVATE module variable ‘mu_r’ declared at (1) [-Wunused-value] magnetic.f90:145:31: 145 | real :: relhel_aa=1., nexp_aa=0. | 1 Warning: Unused PRIVATE module variable ‘nexp_aa’ declared at (1) [-Wunused-value] magnetic.f90:165:76: 165 | real :: kpeak_aa=10., kgaussian_aa=0., brms_target=1.0, rescaling_fraction=1.0 | 1 Warning: Unused PRIVATE module variable ‘rescaling_fraction’ declared at (1) [-Wunused-value] magnetic.f90:176:42: 176 | real :: znoise_int=impossible,znoise_ext=impossible | 1 Warning: Unused PRIVATE module variable ‘znoise_ext’ declared at (1) [-Wunused-value] magnetic.f90:176:20: 176 | real :: znoise_int=impossible,znoise_ext=impossible | 1 Warning: Unused PRIVATE module variable ‘znoise_int’ declared at (1) [-Wunused-value] magnetic.f90:11499:35: 11499 | subroutine magnetic_after_mn(df) | 1 Warning: Unused dummy argument ‘df’ at (1) [-Wunused-dummy-argument] magnetic.f90:9591:41: 9591 | real, dimension(mx,my,mz) :: Ax_ext,Ay_ext | 1 Warning: Array ‘ax_ext’ 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] magnetic.f90:9591:48: 9591 | real, dimension(mx,my,mz) :: Ax_ext,Ay_ext | 1 Warning: Array ‘ay_ext’ 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] magnetic.f90:8468:10: 8468 | 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] magnetic.f90:8322:38: 8322 | subroutine forcing_continuous(df,p) | 1 Warning: Unused dummy argument ‘p’ at (1) [-Wunused-dummy-argument] magnetic.f90:5176:49: 5176 | real, dimension (nx) :: vdrift, va2max_beta | 1 Warning: Unused variable ‘va2max_beta’ declared at (1) [-Wunused-variable] magnetic.f90:5066:51: 5066 | real, dimension (nx,3) :: gchi_diamag, Bk_Bki, jj_diamag, tmp | 1 Warning: Unused variable ‘bk_bki’ declared at (1) [-Wunused-variable] magnetic.f90:4048:28: 4048 | 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] magnetic.f90:2239:10: 2239 | use Gravity, only: gravz, z1, z2 | 1 Warning: Unused module variable ‘z1’ which has been explicitly imported at (1) [-Wunused-variable] magnetic.f90:2239:10: 2239 | use Gravity, only: gravz, z1, z2 | 1 Warning: Unused module variable ‘z2’ which has been explicitly imported at (1) [-Wunused-variable] magnetic.f90:4035:39: 4035 | subroutine update_char_vel_magnetic(f) | ^ Warning: ‘update_char_vel_magnetic’ defined but not used [-Wunused-function] magnetic.f90:8212:25: 8212 | subroutine curflux_dS(uxb,jj) | ^ Warning: ‘curflux_ds’ defined but not used [-Wunused-function] magnetic.f90:11519:24: 11519 | subroutine braginsky | ^ Warning: ‘braginsky’ defined but not used [-Wunused-function] magnetic.f90:11601:36: 11601 | subroutine remove_volume_average(f) | ^ Warning: ‘remove_volume_average’ 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 -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 -std=f2003 -o power_spectrum.o -c power_spectrum.f90 hydro.f90:6466:21: 6466 | last_t = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:6488:18: 6488 | tau = (t-tfade_start) / (tdamp-tfade_start) - 0.5 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5616:29: 5616 | hydro_energy=hydro_energy-eps_hless & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5696:20: 5696 | press=press-eps_hless*max(0.d0, min(1.d0, (f(:,m,n,ihless)+0.5d0*width_hless_absolute-t)/width_hless_absolute)) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5778:10: 5778 | c=cos(omega_precession*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5779:10: 5779 | s=sin(omega_precession*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5533:16: 5533 | t_cor=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5510:19: 5510 | fact_cos=cos(omega_fourier*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5511:19: 5511 | fact_sin=sin(omega_fourier*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:4851:15: 4851 | kx = kx_uu(1) + qshear*Omega*ky_uu(1)*t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:4311:24: 4311 | arad_normal=4*sigmaSB/c_light | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:4312:20: 4312 | pradrc2=onethird*arad_normal*p%TT**4/(p%rho*c_light**2) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:4313:18: 4313 | frict=ekman_friction*fourthird*p%yH*sigma_Thomson*arad_normal*p%TT**4/(m_p*c_light) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:3459:24: 3459 | tmp_rho=tmp_rho-eps_hless & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:174:31: 174 | integer :: N_modes_uu=0, iuij=0 | 1 Warning: Unused PRIVATE module variable ‘iuij’ declared at (1) [-Wunused-value] hydro.f90:182:45: 182 | 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:182:24: 182 | 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:954:46: 954 | real, dimension (nx) :: prof_amp1, prof_amp2 | 1 Warning: Unused PRIVATE module variable ‘prof_amp2’ declared at (1) [-Wunused-value] hydro.f90:152:19: 152 | 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:259:45: 259 | 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] power_spectrum.f90:7065:37: 7065 | filename_h5 = filename//'.h5' | 1 Warning: CHARACTER expression will be truncated in assignment (135/138) at (1) [-Wcharacter-truncation] power_spectrum.f90:6994:28: 6994 | kz_arr=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:6994:58: 6994 | kz_arr=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:6960:28: 6960 | ky_arr=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:6960:58: 6960 | ky_arr=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:6926:28: 6926 | kx_arr=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:6926:58: 6926 | kx_arr=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:6319:14: 6319 | kxx = kx(ikx+ipx*nx) ! the true kx | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] power_spectrum.f90:6320:14: 6320 | kyy = ky(iky+ipy*ny) ! the true ky | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] power_spectrum.f90:6321:14: 6321 | kzz = kz(ikz+ipz*nz) ! the true kz | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] hydro.f90:3432:26: 3432 | integer :: i_4_49_50, j_4_49_50 | 1 Warning: Unused variable ‘i_4_49_50’ declared at (1) [-Wunused-variable] hydro.f90:3432:37: 3432 | integer :: i_4_49_50, j_4_49_50 | 1 Warning: Unused variable ‘j_4_49_50’ declared at (1) [-Wunused-variable] power_spectrum.f90:745:17: 745 | k2=get_k2(ikx+ipx*nx, iky+ipy*ny, ikz+ipz*nz) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] power_spectrum.f90:543:13: 543 | k2=get_k2(ikx+ipx*nx, iky+ipy*ny, ikz+ipz*nz) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] 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:7265:34: 7265 | integer :: ix, iy, iz, l, i, j, ikx, iky, ikz | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] power_spectrum.f90:6593:16: 6593 | integer :: i,ikx,iky,ikz,k | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:6406:22: 6406 | integer :: ncomp,i,ivec,ikx,iky,ikz,jkx,jky,jkz | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:6127:16: 6127 | integer :: i, ikx, iky, ikz, im, in, ivec, ikr | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5855:16: 5855 | integer :: i,ivec,ikx,iky,ikz,jkx,jkz,k | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5520:16: 5520 | integer :: i, k, ikx, iky, ikz, jkz, ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5515:8: 5515 | 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:5515:8: 5515 | 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:5362:16: 5362 | integer :: i, ikx, iky, ikz, im, in, ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:5362:35: 5362 | integer :: i, ikx, iky, ikz, im, in, ivec | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:5362:39: 5362 | integer :: i, ikx, iky, ikz, im, in, ivec | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:5359:8: 5359 | 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:5359:8: 5359 | 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:5359:8: 5359 | 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:5359:8: 5359 | 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:4876:47: 4876 | integer :: i, ikx, iky, ikz, ivec, jvec, im, in | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:4876:51: 4876 | integer :: i, ikx, iky, ikz, ivec, jvec, im, in | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:4765:16: 4765 | integer :: i,k,ikx,iky,ikz,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:4621:21: 4621 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:4621:24: 4621 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:4449:21: 4449 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:4449:24: 4449 | integer :: j,l,im,in,ivec,ispec,ifirst_fft | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:4307:16: 4307 | integer :: i,ivec,ikx,iky,ikz,kr,ipdf | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:4180:47: 4180 | real, dimension (nx,3) :: grad1, grad2, gcc | 1 Warning: Unused variable ‘gcc’ declared at (1) [-Wunused-variable] power_spectrum.f90:4181:40: 4181 | real, dimension (nx) :: pdf_var,gcc2, pdfy_var | 1 Warning: Unused variable ‘gcc2’ declared at (1) [-Wunused-variable] power_spectrum.f90:4180:35: 4180 | real, dimension (nx,3) :: grad1, grad2, gcc | 1 Warning: Unused variable ‘grad1’ declared at (1) [-Wunused-variable] power_spectrum.f90:4180:42: 4180 | real, dimension (nx,3) :: grad1, grad2, gcc | 1 Warning: Unused variable ‘grad2’ declared at (1) [-Wunused-variable] power_spectrum.f90:4176:38: 4176 | integer :: l, i_pdf, i_pdfy, ichem | 1 Warning: Unused variable ‘ichem’ declared at (1) [-Wunused-variable] power_spectrum.f90:4190:32: 4190 | integer, pointer :: ispecial | 1 Warning: Unused variable ‘ispecial’ declared at (1) [-Wunused-variable] power_spectrum.f90:3676:26: 3676 | integer :: ix,iy,iz,im,in,ikx,iky,ikz,nc | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:3676:29: 3676 | integer :: ix,iy,iz,im,in,ikx,iky,ikz,nc | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:3347:16: 3347 | integer :: i,k,ikx,iky,ikz, ivec, im, in, ia0 | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:3347:40: 3347 | integer :: i,k,ikx,iky,ikz, ivec, im, in, ia0 | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:3347:44: 3347 | integer :: i,k,ikx,iky,ikz, ivec, im, in, ia0 | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:3059:16: 3059 | integer :: i,k,ikx,iky,ikz | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2863:39: 2863 | 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:2863:49: 2863 | 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:2860:16: 2860 | integer :: i,k,ikx,iky,ikz,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2863:44: 2863 | 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:2661:16: 2661 | integer :: i,k,ikx,iky,ikz,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2459:16: 2459 | integer :: i,k,ikx,iky,ikz,ivec, stat | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2462:38: 2462 | 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:2182:16: 2182 | integer :: i, k, ikx, iky, ikz, ivec, stat | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:2185:38: 2185 | 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:1500:30: 1500 | real, dimension(nx) :: bbi, jji, b2, j2 | 1 Warning: Unused variable ‘bbi’ declared at (1) [-Wunused-variable] power_spectrum.f90:1497:16: 1497 | 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:854:16: 854 | integer :: i,k,ikx,iky,ikz,im,in,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:854:33: 854 | integer :: i,k,ikx,iky,ikz,im,in,ivec | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:854:36: 854 | integer :: i,k,ikx,iky,ikz,im,in,ivec | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:853:48: 853 | real, dimension(nk) :: spectrum,spectrum_sum | 1 Warning: Unused variable ‘spectrum_sum’ declared at (1) [-Wunused-variable] power_spectrum.f90:789:14: 789 | real :: k2 | 1 Warning: Unused variable ‘k2’ declared at (1) [-Wunused-variable] power_spectrum.f90:584:16: 584 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:584:22: 584 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘ikx’ declared at (1) [-Wunused-variable] power_spectrum.f90:584:26: 584 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘iky’ declared at (1) [-Wunused-variable] power_spectrum.f90:584:30: 584 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘ikz’ declared at (1) [-Wunused-variable] power_spectrum.f90:584:33: 584 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘im’ declared at (1) [-Wunused-variable] power_spectrum.f90:584:36: 584 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘in’ declared at (1) [-Wunused-variable] power_spectrum.f90:584:18: 584 | integer :: i,k,ikx,iky,ikz,im,in | 1 Warning: Unused variable ‘k’ declared at (1) [-Wunused-variable] power_spectrum.f90:586:14: 586 | real :: k2 | 1 Warning: Unused variable ‘k2’ declared at (1) [-Wunused-variable] power_spectrum.f90:130:8: 130 | 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:130:8: 130 | 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:130:8: 130 | 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:6277:39: 6277 | subroutine coriolis_spherical_del2p(f,p) | ^ Warning: ‘coriolis_spherical_del2p’ defined but not used [-Wunused-function] hydro.f90:6368:41: 6368 | subroutine coriolis_cylindrical_del2p(f,p) | ^ Warning: ‘coriolis_cylindrical_del2p’ defined but not used [-Wunused-function] hydro.f90:7851:4: 7851 | function decomp_prepare() result (ldecomp) | ^ Warning: ‘decomp_prepare’ defined but not used [-Wunused-function] power_spectrum.f90:2443:25: 2443 | subroutine powerLor_OLD(f,sp) | ^ Warning: ‘powerlor_old’ defined but not used [-Wunused-function] power_spectrum.f90:7152:39: 7152 | subroutine gather_and_output_by_range(data, kxrange, kyrange, zrange, label) | ^ Warning: ‘gather_and_output_by_range’ 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 -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 -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 -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 -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 -std=f2003 -o slices.o -c slices.f90 mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f2003 -o snapshot.o -c snapshot.f90 slices.f90:253:36: 253 | lwrite_slice_yz=(ipx==nprocx/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:297:37: 297 | 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:334:36: 334 | 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:336:37: 336 | lwrite_slice_xy2=(ipz==nprocz/4) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:480:21: 480 | if (ipz<=nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:480:21: 480 | if (ipz<=nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:489:21: 489 | elseif (ipz>=2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] slices.f90:489:21: 489 | elseif (ipz>=2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] slices.f90:132:34: 132 | if (ip<=12.and.lroot) time1=mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] slices.f90:63:20: 63 | t_trigger=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] slices.f90:471:34: 471 | subroutine prep_xy_slice(izloc) | 1 Warning: Unused dummy argument ‘izloc’ at (1) [-Wunused-dummy-argument] slices.f90:471:28: 471 | subroutine prep_xy_slice(izloc) | ^ Warning: ‘prep_xy_slice’ defined but not used [-Wunused-function] snapshot.f90:824:45: 824 | if (trigger_spec=='code_time') tspec=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] snapshot.f90:784:22: 784 | t_trigger=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] snapshot.f90:341:22: 341 | t_trigger=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] snapshot.f90:432:41: 432 | subroutine read_predef_snaptimes(file,snaptimes) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] snapshot.f90:295:56: 295 | 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:432:36: 432 | 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 -std=f2003 -o equ.o -c equ.f90 equ.f90:1061:21: 1061 | start_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:1063:19: 1063 | end_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:192:21: 192 | start_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:194:19: 194 | end_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:268:20: 268 | dt1_max=1./(dt_incr*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:303:23: 303 | start_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:305:43: 305 | time_spent_copying_and_waiting = time_spent_copying_and_waiting+mpiwtime()-start_time | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:309:21: 309 | start_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:315:19: 315 | end_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:321:21: 321 | start_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:323:19: 323 | end_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:408:20: 408 | tdiagnos = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:1861:32: 1861 | 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:1777:23: 1777 | 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] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -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 -std=f2003 -o pencil_check.o -c pencil_check.f90 timestep.f90:208:21: 208 | start_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] timestep.f90:214:33: 214 | after_substep_sum_time = after_substep_sum_time + mpiwtime()-start_time | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] timestep.f90:326:31: 326 | subroutine pushpars2c(p_par) | 1 Warning: Unused dummy argument ‘p_par’ at (1) [-Wunused-dummy-argument] timestep.f90:98:47: 98 | 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 -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 -std=f2003 -o register.o -c register.f90 register.f90:291:12: 291 | mu0=mu0_cgs*unit_density*(unit_velocity/unit_magnetic)**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] register.f90:312:12: 312 | mu0=1e-7*mu0_cgs*unit_density*(unit_velocity/unit_magnetic)**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -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 -std=f2003 -o run.o -c run.f90 run.f90:1225:62: 1225 | 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:1225:55: 1225 | wall_clock_time/icount/(nw+npar/ncpus)/ncpus/1.0e-6 | 1 Warning: Possible change of value in conversion from INTEGER(8) to REAL(4) at (1) [-Wconversion] run.f90:963:13: 963 | tsound=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:392:17: 392 | tsound = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:495:25: 495 | timer_for_timestep = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:497:23: 497 | time_in_timestep = time_in_timestep + mpiwtime()-timer_for_timestep | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:541:22: 541 | wall_clock_time=mpiwtime()-time1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:548:22: 548 | time_per_step = (time_this_diagnostic - time_last_diagnostic) & | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:253:36: 253 | if (ip<=12.and.lroot) tvar1=mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:1218:20: 1218 | wall_clock_time=time2-time1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:79:19: 79 | start_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:105:17: 105 | end_time = mpiwtime() | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:630:6: 630 | 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:678:27: 678 | integer :: helper_core_id | 1 Warning: Unused variable ‘helper_core_id’ declared at (1) [-Wunused-variable] run.f90:676:14: 676 | integer :: i,j | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] run.f90:676:16: 676 | integer :: i,j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] run.f90:677:27: 677 | integer :: master_core_id | 1 Warning: Unused variable ‘master_core_id’ declared at (1) [-Wunused-variable] run.f90:665:25: 665 | 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:626:6: 626 | 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:679:58: 679 | integer, dimension(max_threads_possible) :: tmp_core_ids | 1 Warning: Unused variable ‘tmp_core_ids’ declared at (1) [-Wunused-variable] mpif90 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 nohdf5_io.o io_dist.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 noentropy.o eos_idealgas.o forcing.o nogravity.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 poisson.o nopolymer.o pscalar_nolog.o noradiation.o noselfgravity.o noSGS_hydro.o noshear.o noshock.o special/advective_gauge.o noascalar.o notestfield.o notestflow.o notestscalar.o viscosity.o nogpu.o timestep.o notraining.o equ.o pencil_check.o global_pushpars.o run.o -ldl fftpack.o -o run.x mpif90 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 nohdf5_io.o io_dist.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 noentropy.o eos_idealgas.o forcing.o nogravity.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 poisson.o nopolymer.o pscalar_nolog.o noradiation.o noselfgravity.o noSGS_hydro.o noshear.o noshock.o special/advective_gauge.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 make[2]: Leaving directory '/home/pencil/full/samples/advective_gauge/src' make[1]: Leaving directory '/home/pencil/full/samples/advective_gauge/src'