Operators CPU backend.
More...
|
subroutine, public | opr_cpu_dudxyz (du, u, dr, ds, dt, coef) |
|
subroutine, public | opr_cpu_opgrad (ux, uy, uz, u, coef, e_start, e_end) |
|
subroutine, public | opr_cpu_cdtp (dtx, x, dr, ds, dt, coef) |
|
subroutine, public | opr_cpu_conv1 (du, u, vx, vy, vz, Xh, coef, e_start, e_end) |
|
subroutine, public | opr_cpu_curl (w1, w2, w3, u1, u2, u3, work1, work2, c_Xh) |
|
real(kind=rp) function, public | opr_cpu_cfl (dt, u, v, w, Xh, coef, nelv, gdim) |
|
subroutine, public | opr_cpu_lambda2 (lambda2, u, v, w, coef) |
|
◆ opr_cpu_cdtp()
subroutine, public opr_cpu::opr_cpu_cdtp |
( |
real(kind=rp), dimension(coef%xh%lxyz,coef%msh%nelv), intent(inout) |
dtx, |
|
|
real(kind=rp), dimension(coef%xh%lxyz,coef%msh%nelv), intent(inout) |
x, |
|
|
real(kind=rp), dimension(coef%xh%lxyz,coef%msh%nelv), intent(in) |
dr, |
|
|
real(kind=rp), dimension(coef%xh%lxyz,coef%msh%nelv), intent(in) |
ds, |
|
|
real(kind=rp), dimension(coef%xh%lxyz,coef%msh%nelv), intent(in) |
dt, |
|
|
type(coef_t), intent(in) |
coef |
|
) |
| |
◆ opr_cpu_cfl()
real(kind=rp) function, public opr_cpu::opr_cpu_cfl |
( |
real(kind=rp) |
dt, |
|
|
real(kind=rp), dimension(xh%lx,xh%ly,xh%lz,nelv) |
u, |
|
|
real(kind=rp), dimension(xh%lx,xh%ly,xh%lz,nelv) |
v, |
|
|
real(kind=rp), dimension(xh%lx,xh%ly,xh%lz,nelv) |
w, |
|
|
type(space_t) |
Xh, |
|
|
type(coef_t) |
coef, |
|
|
integer |
nelv, |
|
|
integer |
gdim |
|
) |
| |
◆ opr_cpu_conv1()
subroutine, public opr_cpu::opr_cpu_conv1 |
( |
real(kind=rp), dimension(xh%lxyz,e_end-e_start+1), intent(inout) |
du, |
|
|
real(kind=rp), dimension(xh%lx,xh%ly,xh%lz,e_end-e_start+1), intent(inout) |
u, |
|
|
real(kind=rp), dimension(xh%lx,xh%ly,xh%lz,e_end-e_start+1), intent(inout) |
vx, |
|
|
real(kind=rp), dimension(xh%lx,xh%ly,xh%lz,e_end-e_start+1), intent(inout) |
vy, |
|
|
real(kind=rp), dimension(xh%lx,xh%ly,xh%lz,e_end-e_start+1), intent(inout) |
vz, |
|
|
type(space_t), intent(in) |
Xh, |
|
|
type(coef_t), intent(in) |
coef, |
|
|
integer, intent(in) |
e_start, |
|
|
integer, intent(in) |
e_end |
|
) |
| |
◆ opr_cpu_curl()
subroutine, public opr_cpu::opr_cpu_curl |
( |
type(field_t), intent(inout) |
w1, |
|
|
type(field_t), intent(inout) |
w2, |
|
|
type(field_t), intent(inout) |
w3, |
|
|
type(field_t), intent(inout) |
u1, |
|
|
type(field_t), intent(inout) |
u2, |
|
|
type(field_t), intent(inout) |
u3, |
|
|
type(field_t), intent(inout) |
work1, |
|
|
type(field_t), intent(inout) |
work2, |
|
|
type(coef_t), intent(in) |
c_Xh |
|
) |
| |
◆ opr_cpu_dudxyz()
subroutine, public opr_cpu::opr_cpu_dudxyz |
( |
real(kind=rp), dimension(coef%xh%lx,coef%xh%ly,coef%xh%lz,coef%msh%nelv), intent(inout) |
du, |
|
|
real(kind=rp), dimension(coef%xh%lx,coef%xh%ly,coef%xh%lz,coef%msh%nelv), intent(in) |
u, |
|
|
real(kind=rp), dimension(coef%xh%lx,coef%xh%ly,coef%xh%lz,coef%msh%nelv), intent(in) |
dr, |
|
|
real(kind=rp), dimension(coef%xh%lx,coef%xh%ly,coef%xh%lz,coef%msh%nelv), intent(in) |
ds, |
|
|
real(kind=rp), dimension(coef%xh%lx,coef%xh%ly,coef%xh%lz,coef%msh%nelv), intent(in) |
dt, |
|
|
type(coef_t), intent(in), target |
coef |
|
) |
| |
◆ opr_cpu_lambda2()
subroutine, public opr_cpu::opr_cpu_lambda2 |
( |
type(field_t), intent(inout) |
lambda2, |
|
|
type(field_t), intent(in) |
u, |
|
|
type(field_t), intent(in) |
v, |
|
|
type(field_t), intent(in) |
w, |
|
|
type(coef_t), intent(in) |
coef |
|
) |
| |
◆ opr_cpu_opgrad()
subroutine, public opr_cpu::opr_cpu_opgrad |
( |
real(kind=rp), dimension(coef%xh%lxyz,e_end-e_start+1), intent(inout) |
ux, |
|
|
real(kind=rp), dimension(coef%xh%lxyz,e_end-e_start+1), intent(inout) |
uy, |
|
|
real(kind=rp), dimension(coef%xh%lxyz,e_end-e_start+1), intent(inout) |
uz, |
|
|
real(kind=rp), dimension(coef%xh%lxyz,e_end-e_start+1), intent(in) |
u, |
|
|
type(coef_t), intent(in) |
coef, |
|
|
integer, intent(in) |
e_start, |
|
|
integer, intent(in) |
e_end |
|
) |
| |