This subroutine computes the explicit contribution of headlosses terms.
More...
|
| subroutine | tspdcv (ncepdp, icepdc, vela, ckupdc, trav) |
| |
This subroutine computes the explicit contribution of headlosses terms.
◆ tspdcv()
| subroutine tspdcv |
( |
integer |
ncepdp, |
|
|
integer, dimension(ncepdp) |
icepdc, |
|
|
double precision, dimension (3 ,ncelet) |
vela, |
|
|
double precision, dimension(6,ncepdp) |
ckupdc, |
|
|
double precision, dimension(3,ncelet) |
trav |
|
) |
| |
- Parameters
-
| [in] | ncepdp | number of cells with head loss |
| [in] | icepdc | index of cells with head loss |
| [in] | vela | velocity at the previous time step |
| [in] | ckupdc | work array for the head loss |
| [out] | trav | right hand side |