subroutine rhs_maker_device::rhs_maker_bdf_hip::rhs_maker_bdf_hip |
( |
type(c_ptr), value |
ulag1_d, |
|
|
type(c_ptr), value |
ulag2_d, |
|
|
type(c_ptr), value |
vlag1_d, |
|
|
type(c_ptr), value |
vlag2_d, |
|
|
type(c_ptr), value |
wlag1_d, |
|
|
type(c_ptr), value |
wlag2_d, |
|
|
type(c_ptr), value |
bfx_d, |
|
|
type(c_ptr), value |
bfy_d, |
|
|
type(c_ptr), value |
bfz_d, |
|
|
type(c_ptr), value |
u_d, |
|
|
type(c_ptr), value |
v_d, |
|
|
type(c_ptr), value |
w_d, |
|
|
type(c_ptr), value |
B_d, |
|
|
real(c_rp) |
rho, |
|
|
real(c_rp) |
dt, |
|
|
real(c_rp) |
bd2, |
|
|
real(c_rp) |
bd3, |
|
|
real(c_rp) |
bd4, |
|
|
integer(c_int) |
nbd, |
|
|
integer(c_int) |
n |
|
) |
| |
|
private |