Translation of the "itypfb(*, *) = icscpl" condition.
More...
|
subroutine | csc2cl (nvcp, nvcpto, nfbcpl, nfbncp, icodcl, itypfb, lfbcpl, lfbncp, dt, rcodcl, rvcpfb, pndcpl, dofcpl) |
|
subroutine | csc2cl_init (nvcp, nfbcpl, nfbncp, icodcl, itypfb, lfbcpl, lfbncp) |
| Initialization of the "itypfb(*, *) = icscpl" condition. More...
|
|
Translation of the "itypfb(*, *) = icscpl" condition.
◆ csc2cl()
subroutine csc2cl |
( |
integer |
nvcp, |
|
|
integer |
nvcpto, |
|
|
integer |
nfbcpl, |
|
|
integer |
nfbncp, |
|
|
integer, dimension(nfabor,nvar) |
icodcl, |
|
|
integer, dimension(nfabor) |
itypfb, |
|
|
integer, dimension(nfbcpl) |
lfbcpl, |
|
|
integer, dimension(nfbncp) |
lfbncp, |
|
|
double precision, dimension(ncelet) |
dt, |
|
|
double precision, dimension(nfabor,nvar,3) |
rcodcl, |
|
|
double precision, dimension(nfbcpl,nvcpto) |
rvcpfb, |
|
|
double precision, dimension(nfbcpl) |
pndcpl, |
|
|
double precision, dimension(3,nfbcpl) |
dofcpl |
|
) |
| |
- Parameters
-
[in] | nvcp | |
[in] | nvcpto | |
[in] | nfbcpl | |
[in] | nfbncp | |
[out] | icodcl | face boundary condition code:
- 1 Dirichlet
- 2 Radiative outlet
- 3 Neumann
- 4 sliding and

- 5 smooth wall and

- 6 rough wall and

- 9 free inlet/outlet (input mass flux blocked to 0)
- 13 Dirichlet for the advection operator and Neumann for the diffusion operator
|
[in] | lfbcpl | |
[in] | lfbncp | |
[out] | itypfb | boundary face types |
[in] | dt | time step (per cell) |
[out] | rcodcl | boundary condition values:
- rcodcl(1) value of the dirichlet
- rcodcl(2) value of the exterior exchange coefficient (infinite if no exchange)
- rcodcl(3) value flux density (negative if gain) in w/m2 or roughness in m if icodcl=6
- for the velocity

- for the pressure

- for a scalar
|
[in] | rvcpfb | |
[in] | pndcpl | |
[in] | dofcpl | |
◆ csc2cl_init()
subroutine csc2cl_init |
( |
integer |
nvcp, |
|
|
integer |
nfbcpl, |
|
|
integer |
nfbncp, |
|
|
integer, dimension(nfabor,nvar) |
icodcl, |
|
|
integer, dimension(nfabor) |
itypfb, |
|
|
integer, dimension(nfbcpl) |
lfbcpl, |
|
|
integer, dimension(nfbncp) |
lfbncp |
|
) |
| |