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 |