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' 'CC=mpicc' 'CFLAGS=-DFUNDERSC=1' 'default_to_be' MAKING src/Makefile.inc touch src/.build-history echo "@"`hostname` "("`date`")" >> src/.build-history ( cd src && \ echo "===== " make FROM_PARENT=src/ -f Makefile.src code "====="; \ make FROM_PARENT=src/ -f Makefile.src default_to_be \ ) ===== make FROM_PARENT=src/ -f Makefile.src code ===== make[1]: Entering directory '/home/pencil/daily/samples/GravitationalWaves/src' Compiler: gfortran GCC version: 11 Makefile.src:2765: 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 nopoisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 nopscalar.f90 noradiation.f90 noselfgravity.f90 noSGS_hydro.f90 noshear.f90 noshock.f90 nosignal_handling.f90 nosolid_cells.f90 nostreamlines.f90 notestfield.f90 notestflow.f90 notestscalar.f90 viscosity.f90 cparam.local special/gravitational_waves_hTXk.f90 ${PENCIL_HOME}/utils/pc_identify_revision --reset make -f Makefile.src start.o run.o start.x run.x make[2]: Entering directory '/home/pencil/daily/samples/GravitationalWaves/src' Compiler: gfortran GCC version: 11 Makefile.src:2765: 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 nopoisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 nopscalar.f90 noradiation.f90 noselfgravity.f90 noSGS_hydro.f90 noshear.f90 noshock.f90 nosignal_handling.f90 nosolid_cells.f90 nostreamlines.f90 notestfield.f90 notestflow.f90 notestscalar.f90 viscosity.f90 cparam.local special/gravitational_waves_hTXk.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 nopoisson.f90 nopolymer.f90 power_spectrum.f90 nopython.f90 nopscalar.f90 noradiation.f90 noselfgravity.f90 noSGS_hydro.f90 noshear.f90 noshock.f90 nosignal_handling.f90 nosolid_cells.f90 nostreamlines.f90 notestfield.f90 notestflow.f90 notestscalar.f90 viscosity.f90 cparam.local special/gravitational_waves_hTXk.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 viscosity.o -c viscosity.f90 viscosity.f90:116:22: 116 | logical :: lKit_Olem | 1 Warning: Unused PRIVATE module variable ‘lkit_olem’ declared at (1) [-Wunused-value] viscosity.f90:34:26: 34 | 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:43:36: 43 | 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:43:57: 43 | 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:2836:59: 2836 | subroutine get_viscosity_implicit(ndc, diffus_coeff, iz) | 1 Warning: Unused dummy argument ‘iz’ 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=f95 -o forcing.o -c forcing.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 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=f95 -o noimplicit_physics.o -c noimplicit_physics.f90 forcing.f90:5676:23: 5676 | 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:5680:23: 5680 | 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:5684:23: 5684 | 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:5690:19: 5690 | 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:5692:19: 5692 | 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:5723:21: 5723 | 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:5726:23: 5726 | 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:5727:23: 5727 | 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:5730:23: 5730 | 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:5732:23: 5732 | 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:5752:17: 5752 | 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:5754:17: 5754 | 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:5876:17: 5876 | 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:5997:16: 5997 | 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:5998:16: 5998 | 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:6089:18: 6089 | 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:5319:23: 5319 | 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:5320:23: 5320 | 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:5322:16: 5322 | 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:5323:16: 5323 | 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:5264:23: 5264 | 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:5265:23: 5265 | 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:5266:23: 5266 | 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:5267:23: 5267 | 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:5269:23: 5269 | 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:5270:23: 5270 | 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:5271:23: 5271 | 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:5272:23: 5272 | 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:5333:16: 5333 | 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:5334:16: 5334 | 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:5335:16: 5335 | 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:4926:20: 4926 | 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:4929:34: 4929 | 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:4930:34: 4930 | 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:4931:34: 4931 | 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:4797:16: 4797 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4800:10: 4800 | 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:4805:10: 4805 | 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:4812:15: 4812 | p_weight=(tsforce-t)/dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4731:20: 4731 | 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:4756:22: 4756 | 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:4758:22: 4758 | t_next_blob=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:4227:9: 4227 | 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:4230:9: 4230 | kx=kkx(ik) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4231:9: 4231 | ky=kky(ik) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4232:9: 4232 | kz=kkz(ik) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4274:10: 4274 | kex=ky*ez-kz*ey | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4275:10: 4275 | key=kz*ex-kx*ez | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:4276:10: 4276 | kez=kx*ey-ky*ex | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:3925:16: 3925 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3942:18: 3942 | 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:3699:16: 3699 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3710:18: 3710 | 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:3307:11: 3307 | cost=cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3308:11: 3308 | sint=sin(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3235:11: 3235 | cost=cos(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3236:11: 3236 | sint=sin(omega_ff*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:3096:12: 3096 | emm = cklist(lmindex,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:3097:18: 3097 | Legendrel = cklist(lmindex,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:2966:12: 2966 | emm = cklist(lmindex,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:2967:18: 2967 | Legendrel = cklist(lmindex,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:2764:9: 2764 | 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:2340:9: 2340 | 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:2670:23: 2670 | 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:2671:23: 2671 | 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:2672:23: 2672 | 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:2019:16: 2019 | tsforce=t+dtforce | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] forcing.f90:2030:15: 2030 | 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:2031:15: 2031 | 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:2032:15: 2032 | 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:2092:35: 2092 | 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:2096:41: 2096 | 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:2100:38: 2100 | 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:2103:44: 2103 | 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:2110:37: 2110 | 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:2115:43: 2115 | 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:2155:26: 2155 | 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:1688:13: 1688 | 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:1456:11: 1456 | 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:1298:12: 1298 | 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:1299:12: 1299 | 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:1306:12: 1306 | 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:1307:12: 1307 | 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:1308:12: 1308 | 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:1309:12: 1309 | 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:1312:12: 1312 | 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:1313:12: 1313 | 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:1314:12: 1314 | 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:1315:12: 1315 | 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:887:18: 887 | emm = cklist(ilist,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:888:24: 888 | Legendrel = cklist(ilist,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:949:18: 949 | emm = cklist(ilist,1) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:950:24: 950 | Legendrel = cklist(ilist,2) | 1 Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1) [-Wconversion] forcing.f90:116:90: 116 | 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:116:103: 116 | 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:5636:40: 5636 | subroutine forcing_cont(i,force,rho1) | 1 Warning: Unused dummy argument ‘rho1’ at (1) [-Wunused-dummy-argument] forcing.f90:4891:18: 4891 | integer :: j,jf,l | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:4891:21: 4891 | integer :: j,jf,l | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:4784:27: 4784 | integer :: ik1,ik2,ik | 1 Warning: Unused variable ‘ik’ declared at (1) [-Wunused-variable] forcing.f90:4721:34: 4721 | character (len=intlen) :: ch | 1 Warning: Unused variable ‘ch’ declared at (1) [-Wunused-variable] forcing.f90:4722:35: 4722 | character (len=fnlen) :: file | 1 Warning: Unused variable ‘file’ declared at (1) [-Wunused-variable] forcing.f90:4720:23: 4720 | logical :: lforce | 1 Warning: Unused variable ‘lforce’ declared at (1) [-Wunused-variable] forcing.f90:3457:18: 3457 | integer :: j,jf | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3457:21: 3457 | integer :: j,jf | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3301:18: 3301 | integer :: j,jf | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3301:21: 3301 | integer :: j,jf | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3229:18: 3229 | integer :: j,jf | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3229:21: 3229 | integer :: j,jf | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3079:24: 3079 | integer :: emm,l,j,jf,Legendrel,lmindex,aindex,ell_rand,raindex | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] forcing.f90:3079:27: 3079 | integer :: emm,l,j,jf,Legendrel,lmindex,aindex,ell_rand,raindex | 1 Warning: Unused variable ‘jf’ declared at (1) [-Wunused-variable] forcing.f90:3081:38: 3081 | real :: rz,rindex,ralpha,rphase2,thphase,sthphase,cthphase,costhprime,phprime,alphap,& | 1 Warning: Unused variable ‘rphase2’ declared at (1) [-Wunused-variable] forcing.f90:3081:16: 3081 | real :: rz,rindex,ralpha,rphase2,thphase,sthphase,cthphase,costhprime,phprime,alphap,& | 1 Warning: Unused variable ‘rz’ declared at (1) [-Wunused-variable] forcing.f90:3084:33: 3084 | real, dimension(nx) :: Smod | 1 Warning: Unused variable ‘smod’ declared at (1) [-Wunused-variable] forcing.f90:2756:22: 2756 | integer :: jtest | 1 Warning: Unused variable ‘jtest’ declared at (1) [-Wunused-variable] forcing.f90:1875:35: 1875 | 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:1875:41: 1875 | 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:1875:47: 1875 | 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:263:97: 263 | 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:4197:34: 4197 | subroutine forcing_hel_noshear(f) | ^ Warning: ‘forcing_hel_noshear’ defined but not used [-Wunused-function] forcing.f90:4385:30: 4385 | subroutine forcing_roberts(f) | ^ Warning: ‘forcing_roberts’ defined but not used [-Wunused-function] forcing.f90:5417:40: 5417 | 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=f95 -o magnetic.o -c magnetic.f90 magnetic.f90:409:1: 409 | eta_jump_shock, eta_zshock, tau_remove_meanaxy, & | 1 Warning: Limit of 39 continuations exceeded in statement at (1) magnetic.f90:10639:16: 10639 | 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:10640:16: 10640 | 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:10652:19: 10652 | 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:10653:19: 10653 | 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:10696:22: 10696 | 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:8534:27: 8534 | 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:7273:21: 7273 | taareset=t+daareset | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:5514:14: 5514 | 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:3767:22: 3767 | 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:3768:22: 3768 | 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:3769:22: 3769 | 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:4276:13: 4276 | 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:4315:23: 4315 | 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:1384:17: 1384 | c_light2=c_light**2 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] magnetic.f90:94:46: 94 | real, dimension (:,:,:,:), allocatable :: ap | 1 Warning: Unused PRIVATE module variable ‘ap’ declared at (1) [-Wunused-value] magnetic.f90:153:52: 153 | 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:160:14: 160 | real :: damp=0., two_step_factor=1. | 1 Warning: Unused PRIVATE module variable ‘damp’ declared at (1) [-Wunused-value] magnetic.f90:111:39: 111 | integer :: nzav=0,indzav=0,izav_start=1 | 1 Warning: Unused PRIVATE module variable ‘izav_start’ declared at (1) [-Wunused-value] magnetic.f90:302:28: 302 | 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:247:23: 247 | logical :: lbraginsky=.false., l2d_aa=.false. | 1 Warning: Unused PRIVATE module variable ‘lbraginsky’ declared at (1) [-Wunused-value] magnetic.f90:144:14: 144 | 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:153:76: 153 | 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:10757:33: 10757 | subroutine pushdiags2c(p_diag) | 1 Warning: Unused dummy argument ‘p_diag’ at (1) [-Wunused-dummy-argument] magnetic.f90:7462:38: 7462 | subroutine forcing_continuous(df,p) | 1 Warning: Unused dummy argument ‘p’ at (1) [-Wunused-dummy-argument] magnetic.f90:4506:49: 4506 | real, dimension (nx) :: vdrift, va2max_beta | 1 Warning: Unused variable ‘va2max_beta’ declared at (1) [-Wunused-variable] magnetic.f90:4436:51: 4436 | real, dimension (nx,3) :: gchi_diamag, Bk_Bki, jj_diamag, tmp | 1 Warning: Unused variable ‘bk_bki’ declared at (1) [-Wunused-variable] magnetic.f90:7352:25: 7352 | subroutine curflux_dS(uxb,jj) | ^ Warning: ‘curflux_ds’ defined but not used [-Wunused-function] magnetic.f90:10426:24: 10426 | subroutine braginsky | ^ Warning: ‘braginsky’ 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=f95 -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=f95 -o power_spectrum.o -c power_spectrum.f90 power_spectrum.f90:5568:18: 5568 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5568:48: 5568 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5569:18: 5569 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5569:48: 5569 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5570:18: 5570 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5570:48: 5570 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5399:18: 5399 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5399:48: 5399 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5400:18: 5400 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5400:48: 5400 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5401:18: 5401 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5401:48: 5401 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5152:18: 5152 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5152:48: 5152 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5153:18: 5153 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5153:48: 5153 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5154:18: 5154 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5154:48: 5154 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:5290:12: 5290 | 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:5291:12: 5291 | 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:5292:12: 5292 | 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] power_spectrum.f90:4887:18: 4887 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4887:48: 4887 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4888:18: 4888 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4888:48: 4888 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4889:18: 4889 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4889:48: 4889 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4569:18: 4569 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4569:48: 4569 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4570:18: 4570 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4570:48: 4570 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4571:18: 4571 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4571:48: 4571 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4394:18: 4394 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4394:48: 4394 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4395:18: 4395 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4395:48: 4395 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4396:18: 4396 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4396:48: 4396 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3962:18: 3962 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3962:48: 3962 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3963:18: 3963 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3963:48: 3963 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3964:18: 3964 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3964:48: 3964 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3826:18: 3826 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3826:48: 3826 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3827:18: 3827 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3827:48: 3827 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3828:18: 3828 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3828:48: 3828 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3409:18: 3409 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3409:48: 3409 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3410:18: 3410 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3410:48: 3410 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3411:18: 3411 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:3411:48: 3411 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2780:18: 2780 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2780:48: 2780 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2781:18: 2781 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2781:48: 2781 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2782:18: 2782 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2782:48: 2782 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2529:20: 2529 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2529:50: 2529 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2530:20: 2530 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2530:50: 2530 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2531:20: 2531 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2531:50: 2531 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2309:18: 2309 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2309:48: 2309 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2310:18: 2310 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2310:48: 2310 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2311:18: 2311 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2311:48: 2311 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2111:18: 2111 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2111:48: 2111 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2112:18: 2112 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2112:48: 2112 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2113:18: 2113 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:2113:48: 2113 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1893:18: 1893 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1893:48: 1893 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1894:18: 1894 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1894:48: 1894 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1895:18: 1895 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1895:48: 1895 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1634:18: 1634 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1634:48: 1634 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1635:18: 1635 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1635:48: 1635 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1636:18: 1636 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1636:48: 1636 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1087:18: 1087 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1087:48: 1087 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1088:18: 1088 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1088:48: 1088 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1089:18: 1089 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:1089:48: 1089 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:512:18: 512 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:512:48: 512 | kx=cshift((/(i-(nxgrid+1)/2,i=0,nxgrid-1)/),+(nxgrid+1)/2) !*2*pi/Lx | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:513:18: 513 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:513:48: 513 | ky=cshift((/(i-(nygrid+1)/2,i=0,nygrid-1)/),+(nygrid+1)/2) !*2*pi/Ly | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:514:18: 514 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:514:48: 514 | kz=cshift((/(i-(nzgrid+1)/2,i=0,nzgrid-1)/),+(nzgrid+1)/2) !*2*pi/Lz | 1 Warning: Integer division truncated to constant ‘8’ at (1) [-Winteger-division] power_spectrum.f90:4530:8: 4530 | 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:4530:8: 4530 | 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:4371:8: 4371 | 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:4371:8: 4371 | 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:339:14: 339 | integer :: i,k,ikx,iky,ikz,im,in,ivec | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:81:49: 81 | integer :: ikr, ikmu, ind, ikx, iky, ikz, i, len | 1 Warning: Unused variable ‘i’ declared at (1) [-Wunused-variable] power_spectrum.f90:83:35: 83 | real, dimension(nxgrid) :: kx | 1 Warning: Unused variable ‘kx’ declared at (1) [-Wunused-variable] power_spectrum.f90:84:35: 84 | real, dimension(nygrid) :: ky | 1 Warning: Unused variable ‘ky’ declared at (1) [-Wunused-variable] power_spectrum.f90:85:35: 85 | real, dimension(nzgrid) :: kz | 1 Warning: Unused variable ‘kz’ declared at (1) [-Wunused-variable] hydro.f90:5809:21: 5809 | last_t = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5831:18: 5831 | 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:5124:10: 5124 | c=cos(omega_precession*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:5125:10: 5125 | s=sin(omega_precession*t) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:4909:16: 4909 | t_cor=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:4886:19: 4886 | 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:4887:19: 4887 | 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:4283:15: 4283 | kx = kx_uu + qshear*Omega*ky_uu*t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] hydro.f90:262:18: 262 | real :: cdt_tauf=1.0, ulev=impossible | 1 Warning: Unused PRIVATE module variable ‘cdt_tauf’ declared at (1) [-Wunused-value] hydro.f90:140:45: 140 | 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:140:24: 140 | 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:821:46: 821 | real, dimension (nx) :: prof_amp1, prof_amp2 | 1 Warning: Unused PRIVATE module variable ‘prof_amp2’ declared at (1) [-Wunused-value] hydro.f90:112:19: 112 | real :: u_out_kep=0.0, velocity_ceiling=.0, w_sldchar_hyd=1.0 | 1 Warning: Unused PRIVATE module variable ‘u_out_kep’ declared at (1) [-Wunused-value] hydro.f90:212:45: 212 | 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] hydro.f90:8225:33: 8225 | subroutine pushdiags2c(p_diag) | 1 Warning: Unused dummy argument ‘p_diag’ at (1) [-Wunused-dummy-argument] power_spectrum.f90:1844:25: 1844 | subroutine powerLor_OLD(f,sp) | ^ Warning: ‘powerlor_old’ defined but not used [-Wunused-function] hydro.f90:5859:55: 5859 | real, dimension (nx) :: pdamp,fint_work,fext_work | 1 Warning: Unused variable ‘fext_work’ declared at (1) [-Wunused-variable] hydro.f90:5859:45: 5859 | real, dimension (nx) :: pdamp,fint_work,fext_work | 1 Warning: Unused variable ‘fint_work’ declared at (1) [-Wunused-variable] hydro.f90:3952:40: 3952 | real, dimension (nx,3) :: uxo,temp | 1 Warning: Unused variable ‘temp’ declared at (1) [-Wunused-variable] hydro.f90:3957:21: 3957 | real :: kx,zbot | 1 Warning: Unused variable ‘zbot’ declared at (1) [-Wunused-variable] hydro.f90:3547:19: 3547 | integer :: j | 1 Warning: Unused variable ‘j’ declared at (1) [-Wunused-variable] hydro.f90:5631:39: 5631 | subroutine coriolis_spherical_del2p(f,p) | ^ Warning: ‘coriolis_spherical_del2p’ defined but not used [-Wunused-function] hydro.f90:5722:41: 5722 | subroutine coriolis_cylindrical_del2p(f,p) | ^ Warning: ‘coriolis_cylindrical_del2p’ defined but not used [-Wunused-function] hydro.f90:7024:4: 7024 | function decomp_prepare() result (ldecomp) | ^ Warning: ‘decomp_prepare’ defined but not used [-Wunused-function] mpif90 -O -O0 -Wall -finit-real=sNaN -finit-integer=-2147483648 -g -fbacktrace -fimplicit-none -fcheck=all -ffpe-trap=invalid,zero,overflow -std=f95 -o persist.o -c persist.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 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=f95 -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=f95 -o notestscalar.o -c notestscalar.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=f95 -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=f95 -o snapshot.o -c snapshot.f90 slices.f90:233:36: 233 | lwrite_slice_yz=(ipx==nprocx/2) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:277:37: 277 | 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:314:36: 314 | 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:316:37: 316 | lwrite_slice_xy2=(ipz==nprocz/4) | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:460:21: 460 | if (ipz<=nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:460:21: 460 | if (ipz<=nprocz/3) then | 1 Warning: Integer division truncated to constant ‘0’ at (1) [-Winteger-division] slices.f90:469:21: 469 | elseif (ipz>=2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] slices.f90:469:21: 469 | elseif (ipz>=2*nprocz/3) then | 1 Warning: Integer division truncated to constant ‘1’ at (1) [-Winteger-division] slices.f90:112:34: 112 | 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:59:27: 59 | if (lvideo) tslice = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] slices.f90:451:34: 451 | subroutine prep_xy_slice(izloc) | 1 Warning: Unused dummy argument ‘izloc’ at (1) [-Wunused-dummy-argument] snapshot.f90:347:41: 347 | subroutine read_predef_snaptimes(file,snaptimes) | 1 Warning: Unused dummy argument ‘file’ at (1) [-Wunused-dummy-argument] snapshot.f90:347:51: 347 | subroutine read_predef_snaptimes(file,snaptimes) | 1 Warning: Dummy argument ‘snaptimes’ at (1) was declared INTENT(OUT) but was not set [-Wunused-dummy-argument] snapshot.f90:272:56: 272 | real, dimension(:), allocatable, save :: snaptimes | 1 Warning: Unused variable ‘snaptimes’ declared at (1) [-Wunused-variable] slices.f90:451:28: 451 | subroutine prep_xy_slice(izloc) | ^ Warning: ‘prep_xy_slice’ defined but not used [-Wunused-function] snapshot.f90:347:36: 347 | 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=f95 -o equ.o -c equ.f90 equ.f90:117:34: 117 | if (ldiagnos ) tdiagnos =t ! (diagnostics are for THIS time) | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] equ.f90:118:34: 118 | if (l1davgfirst) t1ddiagnos=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] equ.f90:120:20: 120 | t2davgfirst=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] equ.f90:265:20: 265 | 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:21:44: 21 | logical :: ldiagnos_save, l1davgfirst_save, l1dphiavg_save, l2davgfirst_save | 1 Warning: Unused PRIVATE module variable ‘l1davgfirst_save’ declared at (1) [-Wunused-value] equ.f90:21:60: 21 | logical :: ldiagnos_save, l1davgfirst_save, l1dphiavg_save, l2davgfirst_save | 1 Warning: Unused PRIVATE module variable ‘l1dphiavg_save’ declared at (1) [-Wunused-value] equ.f90:21:78: 21 | logical :: ldiagnos_save, l1davgfirst_save, l1dphiavg_save, l2davgfirst_save | 1 Warning: Unused PRIVATE module variable ‘l2davgfirst_save’ declared at (1) [-Wunused-value] equ.f90:21:26: 21 | logical :: ldiagnos_save, l1davgfirst_save, l1dphiavg_save, l2davgfirst_save | 1 Warning: Unused PRIVATE module variable ‘ldiagnos_save’ declared at (1) [-Wunused-value] equ.f90:20:43: 20 | logical :: started_finalizing_diagnostics = .false. | 1 Warning: Unused PRIVATE module variable ‘started_finalizing_diagnostics’ declared at (1) [-Wunused-value] equ.f90:1331:23: 1331 | real :: dt1_preac | 1 Warning: Unused variable ‘dt1_preac’ 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=f95 -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=f95 -o pencil_check.o -c pencil_check.f90 timestep.f90:317:31: 317 | 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 -o param_io.o -c param_io.f90 param_io.f90:79:26: 79 | 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=f95 -o register.o -c register.f90 register.f90:274:12: 274 | 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:294:12: 294 | 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=f95 -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=f95 -o run.o -c run.f90 run.f90:967:62: 967 | 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:967:55: 967 | 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:390:13: 390 | tsound=t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:609:17: 609 | tsound = t | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:751:22: 751 | wall_clock_time=time2-time1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] run.f90:758:22: 758 | 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:960:20: 960 | wall_clock_time=time2-time1 | 1 Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion] 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 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 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 nopoisson.o nopolymer.o nopscalar.o noradiation.o noselfgravity.o noSGS_hydro.o noshear.o noshock.o special/gravitational_waves_hTXk.o noascalar.o notestfield.o notestflow.o notestscalar.o viscosity.o nogpu.o timestep.o equ.o pencil_check.o param_io.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 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 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 nopoisson.o nopolymer.o nopscalar.o noradiation.o noselfgravity.o noSGS_hydro.o noshear.o noshock.o special/gravitational_waves_hTXk.o noascalar.o notestfield.o notestflow.o notestscalar.o viscosity.o param_io.o nogpu.o start.o -ldl fftpack.o -o start.x make[2]: Leaving directory '/home/pencil/daily/samples/GravitationalWaves/src' ${PENCIL_HOME}/utils/pc_identify_revision --write make[1]: Leaving directory '/home/pencil/daily/samples/GravitationalWaves/src'