Functions/Subroutines | |
subroutine | initiate_fields |
subroutine | read_init_fields (u, v, w, p, t, ff, gg, hh, ss) |
subroutine | add_noise2fields (u, v, w, p, t) |
subroutine | calculate_mean_fields (u, v, w, t, uhx, vhy, mean_u, mean_v, mean_w, mean_t, mean_uu, mean_vv, mean_ww, mean_uw, mean_vw, mean_tt, mean_tw) |
subroutine | get_interp_fields_uvwhxyz (u, v, w, uhx, uhy, uhz, vhx, vhy, vhz, whx, why) |
subroutine | get_interp_fields_thxyz (t, thx, thy, thz) |
subroutine | mpi_2d_fft (c_inout3, direction) |
subroutine | rayleigh_damping (varin) |
subroutine module_tools::initiate_fields | ( | ) |
Definition at line 34 of file module_tools.f90.
References module_variables::aa, module_variables::aa_p, module_variables::aa_t, module_variables::aa_u, module_variables::aa_w, add_noise2fields(), module_variables::bb, module_variables::bb_p, module_variables::bb_t, module_variables::bb_u, module_variables::bb_w, module_variables::c_ff, module_variables::c_gg, module_variables::c_hh, module_variables::c_p, module_variables::c_phi, module_variables::c_qu, module_variables::c_qv, module_variables::c_qw, module_variables::c_src, module_variables::c_ss, module_variables::c_t, module_variables::c_tmp1, module_variables::c_tmp2, module_variables::c_u, module_variables::c_v, module_variables::c_var, module_variables::c_w, module_variables::cc, module_variables::cc_p, module_variables::cc_t, module_variables::cc_u, module_variables::cc_w, module_parameters::cds, module_variables::ff, module_variables::ff0, module_variables::gg, module_variables::gg0, module_parameters::ghst, module_variables::hh, module_variables::hh0, module_parameters::isnoise, module_variables::mean_t, module_variables::mean_tt, module_variables::mean_tw, module_variables::mean_u, module_variables::mean_uu, module_variables::mean_uw, module_variables::mean_v, module_variables::mean_vv, module_variables::mean_vw, module_variables::mean_w, module_variables::mean_ww, module_parameters::nia3, module_parameters::nja3, module_parameters::nka3, module_variables::p, module_variables::phi, module_variables::qu, module_variables::qv, module_variables::qw, read_init_fields(), module_parameters::restart, module_variables::ss, module_variables::ss0, module_variables::t, module_variables::thx, module_variables::thy, module_variables::thz, module_variables::u, module_variables::uhx, module_variables::uhy, module_variables::uhz, module_variables::v, module_variables::vhx, module_variables::vhy, module_variables::vhz, module_variables::w, module_variables::whx, and module_variables::why.
Referenced by module_navier_stokes::drive().
subroutine module_tools::read_init_fields | ( | real(mytype), dimension(:,:,:), intent(out) | u, |
real(mytype), dimension(:,:,:), intent(out) | v, | ||
real(mytype), dimension(:,:,:), intent(out) | w, | ||
real(mytype), dimension(:,:,:), intent(out) | p, | ||
real(mytype), dimension(:,:,:), intent(out) | t, | ||
real(mytype), dimension(:,:,:), intent(out) | ff, | ||
real(mytype), dimension(:,:,:), intent(out) | gg, | ||
real(mytype), dimension(:,:,:), intent(out) | hh, | ||
real(mytype), dimension(:,:,:), intent(out) | ss | ||
) |
Definition at line 261 of file module_tools.f90.
References module_parameters::dts, module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, module_parameters::myid, and module_parameters::u_mrf.
Referenced by initiate_fields().
subroutine module_tools::add_noise2fields | ( | real(mytype), dimension(:,:,:), intent(inout) | u, |
real(mytype), dimension(:,:,:), intent(inout) | v, | ||
real(mytype), dimension(:,:,:), intent(inout) | w, | ||
real(mytype), dimension(:,:,:), intent(inout) | p, | ||
real(mytype), dimension(:,:,:), intent(inout) | t | ||
) |
Definition at line 322 of file module_tools.f90.
References module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, module_parameters::myid, and module_parameters::noise_mag.
Referenced by initiate_fields().
subroutine module_tools::calculate_mean_fields | ( | real(mytype), dimension(:,:,:), intent(in) | u, |
real(mytype), dimension(:,:,:), intent(in) | v, | ||
real(mytype), dimension(:,:,:), intent(in) | w, | ||
real(mytype), dimension(:,:,:), intent(in) | t, | ||
real(mytype), dimension(:,:,:), intent(in) | uhx, | ||
real(mytype), dimension(:,:,:), intent(in) | vhy, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_u, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_v, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_w, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_t, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_uu, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_vv, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_ww, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_uw, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_vw, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_tt, | ||
real(mytype), dimension(:,:,:), intent(out) | mean_tw | ||
) |
Definition at line 365 of file module_tools.f90.
References module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, and module_parameters::u_mrf.
Referenced by module_navier_stokes::time_advancement_fd().
subroutine module_tools::get_interp_fields_uvwhxyz | ( | real(mytype), dimension(:,:,:), intent(in) | u, |
real(mytype), dimension(:,:,:), intent(in) | v, | ||
real(mytype), dimension(:,:,:), intent(in) | w, | ||
real(mytype), dimension(:,:,:), intent(out) | uhx, | ||
real(mytype), dimension(:,:,:), intent(out) | uhy, | ||
real(mytype), dimension(:,:,:), intent(out) | uhz, | ||
real(mytype), dimension(:,:,:), intent(out) | vhx, | ||
real(mytype), dimension(:,:,:), intent(out) | vhy, | ||
real(mytype), dimension(:,:,:), intent(out) | vhz, | ||
real(mytype), dimension(:,:,:), intent(out) | whx, | ||
real(mytype), dimension(:,:,:), intent(out) | why | ||
) |
Definition at line 411 of file module_tools.f90.
References module_parameters::cds, module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, and module_parameters::l_t.
Referenced by module_navier_stokes::time_advancement_fd().
subroutine module_tools::get_interp_fields_thxyz | ( | real(mytype), dimension(:,:,:), intent(in) | t, |
real(mytype), dimension(:,:,:), intent(out) | thx, | ||
real(mytype), dimension(:,:,:), intent(out) | thy, | ||
real(mytype), dimension(:,:,:), intent(out) | thz | ||
) |
Definition at line 474 of file module_tools.f90.
References module_parameters::cds, module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, and module_parameters::l_t.
Referenced by module_navier_stokes::time_advancement_fd().
subroutine module_tools::mpi_2d_fft | ( | complex(mytype), dimension(:,:,:), intent(inout) | c_inout3, |
integer, intent(in) | direction | ||
) |
Definition at line 519 of file module_tools.f90.
References module_variables::c_tmp1, module_variables::c_tmp2, module_parameters::fft_plan1, module_parameters::fft_plan2, module_parameters::i_offset, module_parameters::ifft_plan1, module_parameters::ifft_plan2, module_parameters::j_offset, module_parameters::nx, and module_parameters::ny.
Referenced by module_spectral::calculate_new_p_spec(), module_spectral::calculate_uvw_spec(), module_spectral::cmplx_2_real(), module_spectral::dev_fft_nonlinear_cmplx(), module_spectral::get_div_spec(), module_spectral::get_momentum_cnvdiff_spec(), module_spectral::get_temperature_cnvdiff_spec(), module_poisson_solver::poisson_solver_fft(), module_spectral::real_2_cmplx(), and module_spectral::screen_div_error_spec().
subroutine module_tools::rayleigh_damping | ( | real(mytype), dimension(:,:,:), intent(inout) | varin | ) |
Definition at line 706 of file module_tools.f90.
References module_parameters::cdamp, module_parameters::iend3, module_parameters::ierr, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::nprc, module_parameters::nzdamp, and module_parameters::pi.
Referenced by module_navier_stokes::time_advancement_fd().