Neko 1.99.3
A portable framework for high-order spectral element flow simulations
Loading...
Searching...
No Matches
richardson_device Module Reference

Implements the device kernel for the richardson_t type.

Data Types

interface  hip_richardson_compute
 

Functions/Subroutines

subroutine, public richardson_compute_device (u_d, v_d, w_d, temp_d, ind_r_d, ind_s_d, ind_t_d, ind_e_d, n_x_d, n_y_d, n_z_d, h_d, tau_x_d, tau_y_d, tau_z_d, n_nodes, lx, kappa, mu_w_d, rho_w_d, g, pr, z0, z0h_in, bc_type, bc_value, tstep, ri_b_diagn, l_ob_diagn, utau_diagn, magu_diagn, ti_diagn, ts_diagn, q_diagn, h_x_idx, h_y_idx, h_z_idx)
 Compute the wall shear stress on device using the rough log-law model.
 

Function/Subroutine Documentation

◆ richardson_compute_device()

subroutine, public richardson_device::richardson_compute_device ( type(c_ptr), intent(in u_d,
type(c_ptr), intent(in v_d,
type(c_ptr), intent(in w_d,
type(c_ptr), intent(in temp_d,
type(c_ptr), intent(in ind_r_d,
type(c_ptr), intent(in ind_s_d,
type(c_ptr), intent(in ind_t_d,
type(c_ptr), intent(in ind_e_d,
type(c_ptr), intent(in n_x_d,
type(c_ptr), intent(in n_y_d,
type(c_ptr), intent(in n_z_d,
type(c_ptr), intent(in h_d,
type(c_ptr), intent(inout tau_x_d,
type(c_ptr), intent(inout tau_y_d,
type(c_ptr), intent(inout tau_z_d,
integer, intent(in n_nodes,
integer, intent(in lx,
real(kind=rp), intent(in kappa,
type(c_ptr), intent(in mu_w_d,
type(c_ptr), intent(in rho_w_d,
real(kind=rp), dimension(3)  g,
real(kind=rp), intent(in pr,
real(kind=rp), intent(in z0,
real(kind=rp), intent(in z0h_in,
character(len=*), intent(in bc_type,
real(kind=rp), intent(in bc_value,
integer, intent(in tstep,
type(c_ptr), value  ri_b_diagn,
type(c_ptr), value  l_ob_diagn,
type(c_ptr), value  utau_diagn,
type(c_ptr), value  magu_diagn,
type(c_ptr), value  ti_diagn,
type(c_ptr), value  ts_diagn,
type(c_ptr), value  q_diagn,
type(c_ptr), value  h_x_idx,
type(c_ptr), value  h_y_idx,
type(c_ptr), value  h_z_idx 
)
Parameters
tThe time value.
tstepThe current time-step.

Definition at line 72 of file richardson_device.F90.

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