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

This subroutine performs the solving of epsilon in $ R_{ij} - \varepsilon $ RANS turbulence model. More...

Functions/Subroutines

subroutine reseps (nvar, nscal, ncepdp, ncesmp, ivar, isou, ipp, icepdc, icetsm, itypsm, dt, rtp, rtpa, propce, gradv, produc, gradro, ckupdc, smacel, viscf, viscb, tslagr, smbr, rovsdt)
 

Detailed Description

This subroutine performs the solving of epsilon in $ R_{ij} - \varepsilon $ RANS turbulence model.

Function/Subroutine Documentation

subroutine reseps ( 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,nvar)  itypsm,
double precision, dimension(ncelet)  dt,
double precision, dimension(ncelet,nflown:nvar)  rtp,
double precision, dimension(ncelet,nflown:nvar)  rtpa,
double precision, dimension(ncelet,*)  propce,
double precision, dimension(3, 3, ncelet)  gradv,
double precision, dimension(6,ncelet)  produc,
double precision, dimension(ncelet,3)  gradro,
double precision, dimension(ncepdp,6)  ckupdc,
double precision, dimension(ncesmp,nvar)  smacel,
double precision, dimension(nfac)  viscf,
double precision, dimension(nfabor)  viscb,
double precision, dimension(ncelet,*)  tslagr,
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]itypsmtype of mass source term for each variable (see ustsma)
[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]gradvtableau de travail pour terme grad de vitesse uniqt pour iturb=31
[in]productableau de travail pour production (sans rho volume) uniqt pour iturb=30
[in]gradrotableau de travail pour grad rom
[in]ckupdcwork array for the head loss
[in]smacelvalue associated to each variable in the mass source terms or mass rate (see ustsma)
[in]viscfvisc*surface/dist aux faces internes
[in]viscbvisc*surface/dist aux faces de bord
[in]tslagrcoupling term for lagrangian
[in]smbrworking array
[in]rovsdtworking array