CPU backend for entropy viscosity regularization.
|
| subroutine, public | entropy_viscosity_compute_residual_cpu (entropy_residual, s, s_lag1, s_lag2, s_lag3, bdf_coeffs, dt, n) |
| | Compute entropy residual on CPU.
|
| |
| subroutine, public | entropy_viscosity_compute_viscosity_cpu (reg_coeff, entropy_residual, h, c_avisc_entropy, n_s, n) |
| | Compute viscosity from entropy residual on CPU.
|
| |
| subroutine, public | entropy_viscosity_apply_element_max_cpu (reg_coeff, lx, nelv) |
| | Apply element-wise maximum on CPU.
|
| |
| subroutine, public | entropy_viscosity_clamp_to_low_order_cpu (reg_coeff, h, max_wave_speed, c_avisc_low, n) |
| | Clamp regularization coefficient to low-order viscosity on CPU.
|
| |
| subroutine, public | entropy_viscosity_smooth_divide_cpu (reg_coeff, temp_field, mult_field, n) |
| | Divide by multiplicity for smoothing on CPU.
|
| |
◆ entropy_viscosity_apply_element_max_cpu()
| subroutine, public entropy_viscosity_cpu::entropy_viscosity_apply_element_max_cpu |
( |
real(kind=rp), dimension(lx, lx, lx, nelv), intent(inout) |
reg_coeff, |
|
|
integer, intent(in) |
lx, |
|
|
integer, intent(in) |
nelv |
|
) |
| |
- Parameters
-
| reg_coeff | Regularization coefficient field (modified in-place) |
| lx | Polynomial order |
| nelv | Number of elements |
Definition at line 99 of file entropy_viscosity_cpu.f90.
◆ entropy_viscosity_clamp_to_low_order_cpu()
| subroutine, public entropy_viscosity_cpu::entropy_viscosity_clamp_to_low_order_cpu |
( |
real(kind=rp), dimension(n), intent(inout) |
reg_coeff, |
|
|
real(kind=rp), dimension(n), intent(in) |
h, |
|
|
real(kind=rp), dimension(n), intent(in) |
max_wave_speed, |
|
|
real(kind=rp), intent(in) |
c_avisc_low, |
|
|
integer, intent(in) |
n |
|
) |
| |
- Parameters
-
| reg_coeff | Regularization coefficient field (modified in-place) |
| h | Mesh size field |
| max_wave_speed | Maximum wave speed field |
| c_avisc_low | Low-order viscosity constant |
| n | Number of points |
Definition at line 133 of file entropy_viscosity_cpu.f90.
◆ entropy_viscosity_compute_residual_cpu()
| subroutine, public entropy_viscosity_cpu::entropy_viscosity_compute_residual_cpu |
( |
real(kind=rp), dimension(n), intent(out) |
entropy_residual, |
|
|
real(kind=rp), dimension(n), intent(in) |
s, |
|
|
real(kind=rp), dimension(n), intent(in) |
s_lag1, |
|
|
real(kind=rp), dimension(n), intent(in) |
s_lag2, |
|
|
real(kind=rp), dimension(n), intent(in) |
s_lag3, |
|
|
real(kind=rp), dimension(4), intent(in) |
bdf_coeffs, |
|
|
real(kind=rp), intent(in) |
dt, |
|
|
integer, intent(in) |
n |
|
) |
| |
- Parameters
-
| entropy_residual | Output entropy residual field |
| S | Current entropy field |
| S_lag1 | First lagged entropy field |
| S_lag2 | Second lagged entropy field |
| S_lag3 | Third lagged entropy field |
| bdf_coeffs | BDF time scheme coefficients |
| dt | Time step size |
| n | Number of points |
Definition at line 56 of file entropy_viscosity_cpu.f90.
◆ entropy_viscosity_compute_viscosity_cpu()
| subroutine, public entropy_viscosity_cpu::entropy_viscosity_compute_viscosity_cpu |
( |
real(kind=rp), dimension(n), intent(out) |
reg_coeff, |
|
|
real(kind=rp), dimension(n), intent(in) |
entropy_residual, |
|
|
real(kind=rp), dimension(n), intent(in) |
h, |
|
|
real(kind=rp), intent(in) |
c_avisc_entropy, |
|
|
real(kind=rp), intent(in) |
n_s, |
|
|
integer, intent(in) |
n |
|
) |
| |
- Parameters
-
| reg_coeff | Output regularization coefficient field |
| entropy_residual | Entropy residual field |
| h | Mesh size field |
| c_avisc_entropy | Entropy viscosity constant |
| n_S | Normalization factor |
| n | Number of points |
Definition at line 81 of file entropy_viscosity_cpu.f90.
◆ entropy_viscosity_smooth_divide_cpu()
| subroutine, public entropy_viscosity_cpu::entropy_viscosity_smooth_divide_cpu |
( |
real(kind=rp), dimension(n), intent(out) |
reg_coeff, |
|
|
real(kind=rp), dimension(n), intent(in) |
temp_field, |
|
|
real(kind=rp), dimension(n), intent(in) |
mult_field, |
|
|
integer, intent(in) |
n |
|
) |
| |
- Parameters
-
| reg_coeff | Regularization coefficient field (modified in-place) |
| temp_field | Temporary field with summed values |
| mult_field | Multiplicity field |
| n | Number of points |
Definition at line 154 of file entropy_viscosity_cpu.f90.