src/alge/vitens.f90 File Reference

| programmer's documentation

- Main Page
- Related Pages
- Modules
- Data Structures
- Files

- File List
- Globals

All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
Functions/Subroutines
vitens.f90 File Reference

This function computes the equivalent viscosity at faces for a 3x3 symetric tensor. More...

## Functions/Subroutines
subroutine | vitens (w1, iwarnp, weighf, weighb, viscf, viscb)
subroutine | symmetric_matrix_product (sout, s1, s2)

## Detailed Description

This function computes the equivalent viscosity at faces for a 3x3 symetric tensor.

## Function/Subroutine Documentation

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)