NAME
Thermoelectric_fullState
SYNOPSIS
call Thermoelectric_fullState(real(in) :: solnVec(NUNK_VARS),
OPTIONAL,real(out) :: betaPar,
OPTIONAL,real(out) :: betaPerp,
OPTIONAL,real(out) :: betaCross
OPTIONAL,real(out) :: betaNew)
DESCRIPTION
The stub implementation returns beta = 0 for all components
ARGUMENTS
solnVec : solution state, a vector from UNK with all variables
betaPar : parallel component of Thermoelectric tensor
betaPerp : perpendicular component of Thermoelectric tensor
betaCross : cross component of Thermoelectric tensor
betaNew : new component of Thermoelectric tensor (can replace
betaPar-betaPerp in some cases)