programmer's documentation
 All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
Functions/Subroutines
resrij.f90 File Reference

This subroutine performs the solving of the Reynolds stress components in $ R_{ij} - \varepsilon $ RANS (LRR) turbulence model. More...

Functions/Subroutines

subroutine resrij (nvar, nscal, ncepdp, ncesmp, ivar, isou, ipp, icepdc, icetsm, itpsmp, dt, rtp, rtpa, propce, produc, gradro, ckupdc, smcelp, gamma, viscf, viscb, tslage, tslagi, smbr, rovsdt)
 

Detailed Description

This subroutine performs the solving of the Reynolds stress components in $ R_{ij} - \varepsilon $ RANS (LRR) turbulence model.

Remark:

Function/Subroutine Documentation

subroutine resrij ( integer  nvar,
integer  nscal,
integer  ncepdp,
integer  ncesmp,
integer  ivar,
integer  isou,
integer  ipp,
integer, dimension(ncepdp)  icepdc,
integer, dimension(ncesmp)  icetsm,
integer, dimension(ncesmp)  itpsmp,
double precision, dimension(ncelet)  dt,
double precision, dimension(ncelet,*)  rtp,
double precision, dimension(ncelet,*)  rtpa,
double precision, dimension(ncelet,*)  propce,
double precision, dimension(6,ncelet)  produc,
double precision, dimension(ncelet,3)  gradro,
double precision, dimension(ncepdp,6)  ckupdc,
double precision, dimension(ncesmp)  smcelp,
double precision, dimension(ncesmp)  gamma,
double precision, dimension(nfac)  viscf,
double precision, dimension(nfabor)  viscb,
double precision, dimension(ncelet)  tslage,
double precision, dimension(ncelet)  tslagi,
double precision, dimension(ncelet)  smbr,
double precision, dimension(ncelet)  rovsdt 
)
Parameters
[in]nvartotal number of variables
[in]nscaltotal number of scalars
[in]ncepdpnumber of cells with head loss
[in]ncesmpnumber of cells with mass source term
[in]ivarvariable number
[in]isoulocal variable number (7 here)
[in]ippindex for writing
[in]icepdcindex of cells with head loss
[in]icetsmindex of cells with mass source term
[in]itpsmptype of mass source term for the variables
[in]dttime step (per cell)
[in,out]rtp,rtpacalculated variables at cell centers (at current and previous time steps)
[in]propcephysical properties at cell centers
[in]grdvittableau de travail pour terme grad de vitesse uniqt pour iturb=31
[in]productableau de travail pour production
[in]gradrotableau de travail pour grad rom (sans rho volume) uniqt pour iturb=30
[in]ckupdcwork array for the head loss
[in]smcelpvariable value associated to the mass source term
[in]gammavaleur du flux de masse
[in]viscfvisc*surface/dist aux faces internes
[in]viscbvisc*surface/dist aux faces de bord
[in]tslagrcoupling term for lagrangian
[in]tslageexplicit source terms for the Lagrangian module
[in]tslagiimplicit source terms for the Lagrangian module
[in]smbrworking array
[in]rovsdtworking array