Functions/Subroutines
module_tools Module Reference

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)
 

Function/Subroutine Documentation

◆ initiate_fields()

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().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ read_init_fields()

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 
)

◆ add_noise2fields()

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 
)

◆ calculate_mean_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 
)

◆ get_interp_fields_uvwhxyz()

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 
)

◆ get_interp_fields_thxyz()

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 
)

◆ mpi_2d_fft()

subroutine module_tools::mpi_2d_fft ( complex(mytype), dimension(:,:,:), intent(inout)  c_inout3,
integer, intent(in)  direction 
)

◆ rayleigh_damping()

subroutine module_tools::rayleigh_damping ( real(mytype), dimension(:,:,:), intent(inout)  varin)