Scrambler
1
|
Public Member Functions | |
subroutine | ConductiveGridAdvance (n, stepping) |
subroutine | ConductiveGridGetMaxSpeed (n) |
subroutine | ConductiveSource (n, Info, stepping) |
subroutine | FindFacedTdx (Info, diT, i, j, k, m) |
subroutine | FindFaceB (Info, fb, i, j, k, m) |
subroutine | FindBodyT (Info, mT, i, j, k) |
subroutine | FindConductivity (Info, chic, chir, i, j, k, dir) |
subroutine | FindSaturationFlux (Info, i, j, k, fb, qf, dir) |
subroutine | ThermalFluxLimiter (s, r) |
subroutine | ConductiveGetMaxSpeed (Info) |
Public Attributes | |
REAL(KIND=qPREC), dimension(3, 3), parameter | az = RESHAPE((/4.0,3.0,2.0, 0.765270225971218, 0.724613694800218, 0.647648420009554, 0.084729774028782, 0.125386305199781, 0.20235157990446/), (/3,3/)) |
Definition at line 23 of file conductive.f90.
subroutine ConductiveGridAdvance | ( | INTEGER | n, |
INTEGER | stepping | ||
) |
Definition at line 37 of file conductive.f90.
subroutine ConductiveGridGetMaxSpeed | ( | INTEGER | n | ) |
Definition at line 53 of file conductive.f90.
subroutine ConductiveSource | ( | INTEGER | n, |
TYPE(InfoDef) | Info, | ||
INTEGER | stepping | ||
) |
Definition at line 68 of file conductive.f90.
subroutine FindFacedTdx | ( | TYPE(InfoDef) | Info, |
REAL(KIND=qPREC), dimension(3) | diT, | ||
INTEGER | i, | ||
INTEGER | j, | ||
INTEGER | k, | ||
INTEGER | m | ||
) |
Definition at line 148 of file conductive.f90.
subroutine FindFaceB | ( | TYPE(InfoDef) | Info, |
REAL(KIND=qPREC), dimension(3) | fb, | ||
INTEGER | i, | ||
INTEGER | j, | ||
INTEGER | k, | ||
INTEGER | m | ||
) |
Definition at line 180 of file conductive.f90.
subroutine FindBodyT | ( | TYPE(InfoDef) | Info, |
REAL(KIND=qPREC), dimension(-1:1,-1:1,-1:1) | mT, | ||
INTEGER | i, | ||
INTEGER | j, | ||
INTEGER | k | ||
) |
Definition at line 209 of file conductive.f90.
subroutine FindConductivity | ( | TYPE(InfoDef) | Info, |
REAL(KIND=qPREC) | chic, | ||
REAL(KIND=qPREC) | chir, | ||
INTEGER | i, | ||
INTEGER | j, | ||
INTEGER | k, | ||
INTEGER | dir | ||
) |
Definition at line 232 of file conductive.f90.
subroutine FindSaturationFlux | ( | TYPE(InfoDef) | Info, |
INTEGER | i, | ||
INTEGER | j, | ||
INTEGER | k, | ||
REAL(KIND=qPREC), dimension(3) | fb, | ||
REAL(KIND=qPREC) | qf, | ||
INTEGER | dir | ||
) |
Definition at line 264 of file conductive.f90.
subroutine ThermalFluxLimiter | ( | REAL(KIND=qPREC) | s, |
REAL(KIND=qPREC) | r | ||
) |
Definition at line 286 of file conductive.f90.
subroutine ConductiveGetMaxSpeed | ( | TYPE(InfoDef) | Info | ) |
Definition at line 298 of file conductive.f90.
REAL(KIND=qPREC), dimension(3,3), parameter az = RESHAPE((/4.0,3.0,2.0, 0.765270225971218, 0.724613694800218, 0.647648420009554, 0.084729774028782, 0.125386305199781, 0.20235157990446/), (/3,3/)) |
Definition at line 31 of file conductive.f90.