Functions/Subroutines | |
subroutine | get_momentum_cnvdiff_spec (u, v, w, p, t, c_u, c_v, c_w, c_p, c_ff, c_gg, c_hh, c_qu, c_qv, c_qw) |
subroutine | get_temperature_cnvdiff_spec (u, v, w, t, c_t, c_ss, c_qt) |
subroutine | poisson_solver_fft_spec (aa, bb, cc, c_src_in, c_var_out, zstagger, delnull, tbnd, ubnd) |
subroutine | get_div_spec (c_u, c_v, w, c_div) |
subroutine | calculate_uvw_spec (phi, c_phi, c_u, c_v, c_w) |
subroutine | calculate_new_p_spec (phi, c_phi, c_p) |
subroutine | screen_div_error_spec (u, v, w, c_u, c_v, isfinal, ishistout) |
subroutine | calculate_mean_fields_spec (u, v, w, t, mean_u, mean_v, mean_w, mean_t, mean_uu, mean_vv, mean_ww, mean_uw, mean_vw, mean_tt, mean_tw) |
subroutine | dev_fft_nonlinear_cmplx (r_in1, r_in2, c_out3, dir, weqn) |
subroutine | real_2_cmplx (r_in, c_out) |
subroutine | cmplx_2_real (c_in, r_out) |
subroutine | spectral_truncation (c_inout3) |
subroutine | dev_fft_linear_cmplx (c_in3, c_out3, ord, dir) |
subroutine | rayleigh_damping_spec (c_varin) |
subroutine module_spectral::get_momentum_cnvdiff_spec | ( | real(mytype), dimension(:,:,:), intent(in) | u, |
real(mytype), dimension(:,:,:), intent(in) | v, | ||
real(mytype), dimension(:,:,:), intent(in) | w, | ||
real(mytype), dimension(:,:,:), intent(in) | p, | ||
real(mytype), dimension(:,:,:), intent(in) | t, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_u, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_v, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_w, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_p, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_ff, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_gg, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_hh, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_qu, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_qv, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_qw | ||
) |
Definition at line 37 of file module_spectral.f90.
References module_variables::c_src, module_variables::c_var, dev_fft_linear_cmplx(), dev_fft_nonlinear_cmplx(), module_parameters::dp_opt, module_parameters::dpx_drive, module_parameters::dt, module_parameters::dz, module_parameters::dz_b, module_parameters::dz_t, module_parameters::fc, module_parameters::ghst, module_parameters::got, module_parameters::iend3, module_parameters::isscalar, module_parameters::issk, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, module_parameters::l_b, module_parameters::l_t, module_tools::mpi_2d_fft(), module_parameters::nu, module_parameters::rk_a, module_parameters::rk_b, module_parameters::rk_c, module_parameters::t_ref, module_parameters::u_mrf, module_parameters::ug, module_parameters::update_dpx_drive(), and module_parameters::vg.
Referenced by module_navier_stokes::time_advancement_sp().
subroutine module_spectral::get_temperature_cnvdiff_spec | ( | real(mytype), dimension(:,:,:), intent(in) | u, |
real(mytype), dimension(:,:,:), intent(in) | v, | ||
real(mytype), dimension(:,:,:), intent(in) | w, | ||
real(mytype), dimension(:,:,:), intent(in) | t, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_t, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_ss, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_qt | ||
) |
Definition at line 511 of file module_spectral.f90.
References module_parameters::alpha, module_variables::c_var, dev_fft_linear_cmplx(), dev_fft_nonlinear_cmplx(), module_parameters::dt, module_parameters::dz, module_parameters::dz_b, module_parameters::dz_t, module_parameters::ghst, module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, module_parameters::l_b, module_parameters::l_t, module_tools::mpi_2d_fft(), module_parameters::rk_a, module_parameters::rk_b, module_parameters::rk_c, and module_parameters::u_mrf.
Referenced by module_navier_stokes::time_advancement_sp().
subroutine module_spectral::poisson_solver_fft_spec | ( | real(mytype), dimension(:,:,:), intent(inout) | aa, |
complex(mytype), dimension(:,:,:), intent(inout) | bb, | ||
real(mytype), dimension(:,:,:), intent(inout) | cc, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_src_in, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_var_out, | ||
integer, intent(in) | zstagger, | ||
integer, intent(in) | delnull, | ||
integer, intent(in) | tbnd, | ||
integer, intent(in) | ubnd | ||
) |
Definition at line 604 of file module_spectral.f90.
References module_parameters::alpha, module_variables::c_src, module_parameters::dt, module_parameters::dz, module_parameters::dz_b, module_parameters::dz_t, module_parameters::ghst, module_parameters::kend3, module_parameters::kstr3, module_parameters::myid, module_parameters::nu, module_parameters::nz, module_parameters::ochannel, module_parameters::rk_c, module_parameters::tbot, module_parameters::ttop, and module_parameters::u_mrf.
Referenced by module_navier_stokes::time_advancement_sp().
subroutine module_spectral::get_div_spec | ( | complex(mytype), dimension(:,:,:), intent(in) | c_u, |
complex(mytype), dimension(:,:,:), intent(in) | c_v, | ||
real(mytype), dimension(:,:,:), intent(in) | w, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_div | ||
) |
Definition at line 753 of file module_spectral.f90.
References module_variables::c_var, dev_fft_linear_cmplx(), module_parameters::dz, module_parameters::ghst, module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, and module_tools::mpi_2d_fft().
Referenced by screen_div_error_spec(), and module_navier_stokes::time_advancement_sp().
subroutine module_spectral::calculate_uvw_spec | ( | real(mytype), dimension(:,:,:), intent(in) | phi, |
complex(mytype), dimension(:,:,:), intent(in) | c_phi, | ||
complex(mytype), dimension(:,:,:), intent(inout) | c_u, | ||
complex(mytype), dimension(:,:,:), intent(inout) | c_v, | ||
complex(mytype), dimension(:,:,:), intent(inout) | c_w | ||
) |
Definition at line 802 of file module_spectral.f90.
References module_variables::c_var, dev_fft_linear_cmplx(), module_parameters::dt, module_parameters::dz_t, module_parameters::ghst, module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, module_tools::mpi_2d_fft(), and module_parameters::rk_c.
Referenced by module_navier_stokes::time_advancement_sp().
subroutine module_spectral::calculate_new_p_spec | ( | real(mytype), dimension(:,:,:), intent(in) | phi, |
complex(mytype), dimension(:,:,:), intent(in) | c_phi, | ||
complex(mytype), dimension(:,:,:), intent(inout) | c_p | ||
) |
Definition at line 855 of file module_spectral.f90.
References module_variables::c_var, dev_fft_linear_cmplx(), module_parameters::dt, module_parameters::dz, module_parameters::dz_b, module_parameters::dz_t, module_parameters::ghst, module_parameters::iend3, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, module_tools::mpi_2d_fft(), module_parameters::nu, and module_parameters::rk_c.
Referenced by module_navier_stokes::time_advancement_sp().
subroutine module_spectral::screen_div_error_spec | ( | real(mytype), dimension(:,:,:), intent(in) | u, |
real(mytype), dimension(:,:,:), intent(in) | v, | ||
real(mytype), dimension(:,:,:), intent(in) | w, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_u, | ||
complex(mytype), dimension(:,:,:), intent(in) | c_v, | ||
integer, intent(in) | isfinal, | ||
integer, intent(in) | ishistout | ||
) |
Definition at line 900 of file module_spectral.f90.
References module_variables::c_src, module_parameters::div_hist_max, module_parameters::dp_opt, get_div_spec(), module_parameters::got, module_parameters::iend3, module_parameters::ierr, module_parameters::is_ri_var, module_parameters::istr3, module_parameters::jend3, module_parameters::jstr3, module_parameters::kend3, module_parameters::kstr3, module_tools::mpi_2d_fft(), module_parameters::myid, module_parameters::nx, module_parameters::ny, module_parameters::nz, module_parameters::u_mrf, and module_parameters::ubar.
Referenced by module_navier_stokes::time_advancement_sp().
subroutine module_spectral::calculate_mean_fields_spec | ( | 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(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 1015 of file module_spectral.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_sp().
subroutine module_spectral::dev_fft_nonlinear_cmplx | ( | real(mytype), dimension(:,:,:), intent(in) | r_in1, |
real(mytype), dimension(:,:,:), intent(in) | r_in2, | ||
complex(mytype), dimension(:,:,:), intent(out) | c_out3, | ||
integer, intent(in) | dir, | ||
integer, intent(in) | weqn | ||
) |
Definition at line 1062 of file module_spectral.f90.
References module_parameters::ghst, module_parameters::i_offset, module_parameters::iii, module_parameters::j_offset, module_parameters::l_t, module_parameters::lx, module_parameters::ly, module_tools::mpi_2d_fft(), module_parameters::nx, module_parameters::ny, and module_parameters::pi.
Referenced by get_momentum_cnvdiff_spec(), and get_temperature_cnvdiff_spec().
subroutine module_spectral::real_2_cmplx | ( | real(mytype), dimension(:,:,:), intent(in) | r_in, |
complex(mytype), dimension(:,:,:), intent(out) | c_out | ||
) |
Definition at line 1158 of file module_spectral.f90.
References module_parameters::ghst, and module_tools::mpi_2d_fft().
Referenced by module_navier_stokes::drive().
subroutine module_spectral::cmplx_2_real | ( | complex(mytype), dimension(:,:,:), intent(in) | c_in, |
real(mytype), dimension(:,:,:), intent(out) | r_out | ||
) |
Definition at line 1189 of file module_spectral.f90.
References module_variables::c_var, module_parameters::ghst, and module_tools::mpi_2d_fft().
Referenced by module_navier_stokes::drive(), and module_navier_stokes::time_advancement_sp().
subroutine module_spectral::spectral_truncation | ( | complex(mytype), dimension(:,:,:), intent(inout) | c_inout3 | ) |
Definition at line 1223 of file module_spectral.f90.
References module_parameters::i_offset, module_parameters::j_offset, module_parameters::nx, and module_parameters::ny.
Referenced by module_navier_stokes::drive(), and module_navier_stokes::time_advancement_sp().
subroutine module_spectral::dev_fft_linear_cmplx | ( | complex(mytype), dimension(:,:,:), intent(in) | c_in3, |
complex(mytype), dimension(:,:,:), intent(out) | c_out3, | ||
integer, intent(in) | ord, | ||
integer, intent(in) | dir | ||
) |
Definition at line 1275 of file module_spectral.f90.
References module_parameters::i_offset, module_parameters::iii, module_parameters::j_offset, module_parameters::lx, module_parameters::ly, module_parameters::nx, module_parameters::ny, and module_parameters::pi.
Referenced by calculate_new_p_spec(), calculate_uvw_spec(), get_div_spec(), get_momentum_cnvdiff_spec(), and get_temperature_cnvdiff_spec().
subroutine module_spectral::rayleigh_damping_spec | ( | complex(mytype), dimension(:,:,:), intent(inout) | c_varin | ) |
Definition at line 1346 of file module_spectral.f90.
References module_parameters::cdamp, module_parameters::ghst, 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_sp().