This function computes the equivalent viscosity at faces for a 3x3 symetric tensor.
More...
This function computes the equivalent viscosity at faces for a 3x3 symetric tensor.
subroutine symmetric_matrix_product |
( |
double precision, dimension(6) |
sout, |
|
|
double precision, dimension(6) |
s1, |
|
|
double precision, dimension(6) |
s2 |
|
) |
| |
- Parameters
-
[out] | sout | sout = s1 * s2 |
[in] | s1 | symmetric matrix |
[in] | s2 | symmetric matrix |
subroutine vitens |
( |
double precision, dimension(6,ncelet), target |
w1, |
|
|
integer |
iwarnp, |
|
|
double precision, dimension(2,nfac) |
weighf, |
|
|
double precision, dimension(nfabor) |
weighb, |
|
|
double precision, dimension(nfac) |
viscf, |
|
|
double precision, dimension(nfabor) |
viscb |
|
) |
| |
- Parameters
-
[in] | w1 | cell viscosity symmetric tensor |
[in] | iwarnp | verbosity |
[out] | weighf | inner face weight between cells i and j and |
[out] | weighb | boundary face weight |
[out] | viscf | inner face viscosity (times surface divided distance) |
[out] | viscb | inner face viscosity (surface, must be consistent with flux BCs) |