m_MEF90_HeatXfer Module


Uses


Subroutines

public subroutine MEF90HeatXFerEnergy(MEF90HeatXferCtx, energy, bodyWork, surfaceWork, ierr)

Author
Blaise Bourdin (2012-14, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXFerEnergy: wraps calls to MEF90HeatXferEnergy from m_MEF90_HeatXferAssembly since overloading cannot be used here

Arguments

Type IntentOptional Attributes Name
type(MEF90HeatXfer_Type), intent(in) :: MEF90HeatXferCtx
real(kind=C_DOUBLE), dimension(:), pointer :: energy
real(kind=C_DOUBLE), dimension(:), pointer :: bodyWork
real(kind=C_DOUBLE), dimension(:), pointer :: surfaceWork
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXFerIFunction(tempTS, time, x, xdot, F, PETScCtx, ierr)

Author
Blaise Bourdin (2012-14, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXFerIFunction: wraps calls to MEF90HeatXFerIFunction from m_MEF90_HeatXferAssembly since overloading cannot be used here

Arguments

Type IntentOptional Attributes Name
type(tTS), intent(in) :: tempTS
real(kind=C_DOUBLE), intent(in) :: time
type(tVec), intent(in) :: x
type(tVec), intent(in) :: xdot
type(tVec), intent(inout) :: F
type(c_ptr), intent(in) :: PETScCtx
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXferBilinearForm(snesTemp, x, A, M, PETScCtx, ierr)

Author
Blaise Bourdin (2012-14, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXferBilinearForm: wraps calls to MEF90HeatXferBilinearForm from m_MEF90_HeatXferAssembly since overloading cannot be used here

Arguments

Type IntentOptional Attributes Name
type(tSNES), intent(in) :: snesTemp
type(tVec), intent(in) :: x
type(tMat), intent(inout) :: A
type(tMat), intent(inout) :: M
type(c_ptr), intent(in) :: PETScCtx
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXferCreateSNES(MEF90HeatXferCtx, snesTemp, residual, ierr)

Author
Blaise Bourdin (2014, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXferCreateSNES:

Arguments

Type IntentOptional Attributes Name
type(MEF90HeatXfer_Type), intent(in), target :: MEF90HeatXferCtx
type(tSNES), intent(out) :: snesTemp
type(tVec), intent(in) :: residual
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXferCreateTS(MEF90HeatXferCtx, tsTemp, residual, initialTime, initialStep, ierr)

Author
Blaise Bourdin (2014, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXferCreateTS:

Arguments

Type IntentOptional Attributes Name
type(MEF90HeatXfer_Type), intent(in), target :: MEF90HeatXferCtx
type(tTS), intent(out) :: tsTemp
type(tVec), intent(in) :: residual
real(kind=C_DOUBLE), intent(in) :: initialTime
real(kind=C_DOUBLE), intent(in) :: initialStep
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXferIJacobian(tempTS, t, x, xdot, shift, A, M, PETScCtx, ierr)

Author
Blaise Bourdin (2012-14, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXferIJacobian: wraps calls to MEF90HeatXferIJacobian from m_MEF90_HeatXferAssembly since overloading cannot be used here

Arguments

Type IntentOptional Attributes Name
type(tTS), intent(in) :: tempTS
real(kind=C_DOUBLE), intent(in) :: t
type(tVec), intent(in) :: x
type(tVec), intent(in) :: xdot
real(kind=C_DOUBLE), intent(in) :: shift
type(tMat), intent(inout) :: A
type(tMat), intent(inout) :: M
type(c_ptr), intent(in) :: PETScCtx
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXferOperator(snesTemp, x, residual, PETScCtx, ierr)

Author
Blaise Bourdin (2012-14, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXferOperator: wraps calls to MEF90HeatXferOperator from m_MEF90_HeatXferAssembly since overloading cannot be used here

Arguments

Type IntentOptional Attributes Name
type(tSNES), intent(in) :: snesTemp
type(tVec), intent(in) :: x
type(tVec), intent(inout) :: residual
type(c_ptr), intent(in) :: PETScCtx
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXferSetTransients(MEF90HeatXferCtx, step, time, ierr)

Author
Blaise Bourdin (2012-14, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca)

MEF90HeatXferSetTransients: Update all transient data (boundary / external temperature and fluxes) using the proper scaling law

Arguments

Type IntentOptional Attributes Name
type(MEF90HeatXfer_Type), intent(inout) :: MEF90HeatXferCtx
integer(kind=C_INT32_T), intent(in) :: step
real(kind=C_DOUBLE), intent(in) :: time
integer(kind=C_INT32_T), intent(inout) :: ierr

public subroutine MEF90HeatXferViewEXO(MEF90HeatXferCtx, step, ierr)

Author
Blaise Bourdin (2014, bourdin@lsu.edu) Blaise Bourdin (2022, bourdin@mcmaster.ca) Alexis Marboeuf (2022, marboeua@mcmaster.ca)

MEF90HeatXferViewEXO:

Arguments

Type IntentOptional Attributes Name
type(MEF90HeatXfer_Type), intent(in) :: MEF90HeatXferCtx
integer(kind=C_INT32_T), intent(in) :: step
integer(kind=C_INT32_T), intent(inout) :: ierr