vtf-logo

src/generic/cles.i



       ! Generic True and False values assumed througout the code
       INTEGER CLES_TRUE
       INTEGER CLES_FALSE
       PARAMETER (CLES_TRUE=1)
       PARAMETER (CLES_FALSE=0)

       ! Generic return error codes
       INTEGER CLES_RETURN_OK
       INTEGER CLES_RETURN_ERROR
       INTEGER CLES_RETURN_ALLOC
       PARAMETER (CLES_RETURN_OK=0)
       PARAMETER (CLES_RETURN_ERROR=-1)
       PARAMETER (CLES_RETURN_ALLOC=1)

       ! Transport properties
       INTEGER CLES_TRANSP_NONE
       INTEGER CLES_TRANSP_VISC_CST, CLES_TRANSP_VISC_VAR
       INTEGER CLES_TRANSP_KAPPA_CST, CLES_TRANSP_KAPPA_VAR
       INTEGER CLES_TRANSP_DIFF_CST, CLES_TRANSP_DIFF_VAR
       INTEGER CLES_TRANSP_DIFF_SCHMIDT, CLES_TRANSP_DIFF_LEWIS

       ! type of transport model
       PARAMETER (CLES_TRANSP_NONE=0)

       ! constant or variable value of dynamic viscosity
       PARAMETER (CLES_TRANSP_VISC_CST=1)
       PARAMETER (CLES_TRANSP_VISC_VAR=2)

       ! constant or variable value of thermal conductivity
       PARAMETER (CLES_TRANSP_KAPPA_CST=1)
       PARAMETER (CLES_TRANSP_KAPPA_VAR=2)
  
       ! constant, variable, proportional to viscosity or thermal conductivity
       ! species diffusion
       PARAMETER (CLES_TRANSP_DIFF_CST=1)
       PARAMETER (CLES_TRANSP_DIFF_VAR=2)
       PARAMETER (CLES_TRANSP_DIFF_SCHMIDT=3)
       PARAMETER (CLES_TRANSP_DIFF_LEWIS=4)

       ! Type of boundarys
       INTEGER CLES_CBC_INFLOW, CLES_CBC_OUTFLOW, CLES_CBC_NONE
       INTEGER CLES_CBC_XDIR, CLES_CBC_YDIR, CLES_CBC_ZDIR
       INTEGER CLES_CBC_LEFT, CLES_CBC_RIGHT
       INTEGER CLES_CBC_BOTTOM, CLES_CBC_TOP
       INTEGER CLES_CBC_BACK, CLES_CBC_FRONT
       INTEGER CLES_CBC_MODE1D, CLES_CBC_MODE2D

       PARAMETER (CLES_CBC_NONE=0)
       PARAMETER (CLES_CBC_INFLOW=1)
       PARAMETER (CLES_CBC_OUTFLOW=2)
       PARAMETER (CLES_CBC_XDIR=1)
       PARAMETER (CLES_CBC_YDIR=2)
       PARAMETER (CLES_CBC_ZDIR=3)
       PARAMETER (CLES_CBC_LEFT=1)
       PARAMETER (CLES_CBC_RIGHT=2)
       PARAMETER (CLES_CBC_BOTTOM=1)
       PARAMETER (CLES_CBC_TOP=2)
       PARAMETER (CLES_CBC_BACK=1)
       PARAMETER (CLES_CBC_FRONT=2)
       PARAMETER (CLES_CBC_MODE1D=1)
       PARAMETER (CLES_CBC_MODE2D=2)

       ! dcflag and method switching constants
       INTEGER CLES_SWITCH_TCD
       INTEGER CLES_SWITCH_WENO
       PARAMETER (CLES_SWITCH_TCD=0)
       PARAMETER (CLES_SWITCH_WENO=1)

       ! specify patch solver boundaries and what type.
       INTEGER CLES_PATCH_CORE
       INTEGER CLES_PATCH_BNDRY
       
       PARAMETER (CLES_PATCH_CORE=0)
       PARAMETER (CLES_PATCH_BNDRY=1)

       ! different methods of the solver
       INTEGER CLES_METHOD_UPWIND
       INTEGER CLES_METHOD_HYBRID
       PARAMETER (CLES_METHOD_UPWIND=0)
       PARAMETER (CLES_METHOD_HYBRID=1)

       ! these are the allowed callbacks predefined
       INTEGER CLES_HOOK_SGSFLUX
       INTEGER CLES_HOOK_VISCOUS
       INTEGER CLES_HOOK_OUTPUT
       INTEGER CLES_HOOK_SGSBLANK
       INTEGER CLES_HOOK_CONVECTIVE
       PARAMETER (CLES_HOOK_SGSFLUX=1)
       PARAMETER (CLES_HOOK_VISCOUS=2)
       PARAMETER (CLES_HOOK_OUTPUT=3)
       PARAMETER (CLES_HOOK_SGSBLANK=4)
       PARAMETER (CLES_HOOK_CONVECTIVE=5)

       ! error codes
       INTEGER CLESLOG_ERROR_ALLOCATE
       INTEGER CLESLOG_ERROR_DEALLOCATE
       PARAMETER (CLESLOG_ERROR_ALLOCATE=1)
       PARAMETER (CLESLOG_ERROR_DEALLOCATE=2)

<