Implements the CPU kernel for the spalding_t type.
|
| subroutine, public | spalding_compute_cpu (u, v, w, n_x, n_y, n_z, nu, rho_w, h, tau_x, tau_y, tau_z, n_nodes, kappa, b, tstep) |
| | Compute the wall shear stress on cpu using Spalding's model.
|
| |
| real(kind=rp) function | solve_cpu (u, y, guess, nu, kappa, b) |
| | Newton solver for the algebraic equation defined by the law on cpu.
|
| |
◆ solve_cpu()
| real(kind=rp) function spalding_cpu::solve_cpu |
( |
real(kind=rp), intent(in) |
u, |
|
|
real(kind=rp), intent(in) |
y, |
|
|
real(kind=rp), intent(in) |
guess, |
|
|
real(kind=rp), intent(in) |
nu, |
|
|
real(kind=rp), intent(in) |
kappa, |
|
|
real(kind=rp), intent(in) |
b |
|
) |
| |
|
private |
- Parameters
-
| u | The velocity value. |
| y | The wall-normal distance. |
| guess | Initial guess. |
| nu | The molecular kinematic viscosity. |
| kappa | The von Karman constant. |
| B | The log-law intercept. |
Definition at line 101 of file spalding_cpu.f90.
◆ spalding_compute_cpu()
| subroutine, public spalding_cpu::spalding_compute_cpu |
( |
real(kind=rp), dimension(n_nodes), intent(in) |
u, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
v, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
w, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
n_x, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
n_y, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
n_z, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
nu, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
rho_w, |
|
|
real(kind=rp), dimension(n_nodes), intent(in) |
h, |
|
|
real(kind=rp), dimension(n_nodes), intent(inout) |
tau_x, |
|
|
real(kind=rp), dimension(n_nodes), intent(inout) |
tau_y, |
|
|
real(kind=rp), dimension(n_nodes), intent(inout) |
tau_z, |
|
|
integer, intent(in) |
n_nodes, |
|
|
real(kind=rp), intent(in) |
kappa, |
|
|
real(kind=rp), intent(in) |
b, |
|
|
integer, intent(in) |
tstep |
|
) |
| |
- Parameters
-
| t | The time value. |
| tstep | The current time-step. |
Definition at line 46 of file spalding_cpu.f90.