Functions/Subroutines | |
subroutine | get_source_pres (rhs, u3, v3, w3, ex, ey, sx, sy, maxn, dx, dy, dz, dt) |
subroutine | get_uvw_pres (u3, v3, w3, p, ex, ey, sx, sy, maxn, ex_max, dx, dy, dz, dt, u_inlet) |
subroutine get_source_pres | ( | double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn) | rhs, |
double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn-2) | u3, | ||
double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn-2) | v3, | ||
double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn-1) | w3, | ||
integer | ex, | ||
integer | ey, | ||
integer | sx, | ||
integer | sy, | ||
integer | maxn, | ||
double precision | dx, | ||
double precision | dy, | ||
double precision | dz, | ||
double precision | dt | ||
) |
subroutine get_uvw_pres | ( | double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn-2) | u3, |
double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn-2) | v3, | ||
double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn-1) | w3, | ||
double precision, dimension(sx-1:ex+1,sy-1:ey+1,0:maxn) | p, | ||
integer | ex, | ||
integer | ey, | ||
integer | sx, | ||
integer | sy, | ||
integer | maxn, | ||
integer | ex_max, | ||
double precision | dx, | ||
double precision | dy, | ||
double precision | dz, | ||
double precision | dt, | ||
double precision, dimension(0:maxn-2) | u_inlet | ||
) |