init Interface

private interface init

Calls

interface~~init~3~~CallsGraph interface~init~3 init proc~init_stencilelement init_stencilElement interface~init~3->proc~init_stencilelement proc~init_stencilheader init_stencilHeader interface~init~3->proc~init_stencilheader interface~init~20 init proc~init_stencilheader->interface~init~20 proc~tem_identify_inversedirections tem_identify_inverseDirections proc~init_stencilheader->proc~tem_identify_inversedirections proc~tem_stencil_createcxcx tem_stencil_createCxcx proc~init_stencilheader->proc~tem_stencil_createcxcx proc~init_ga2d_real init_ga2d_real interface~init~20->proc~init_ga2d_real

Module Procedures

private subroutine init_stencilHeader(me, QQN, QQ, nElems, useAll, nDims, label, cxDir)

initialize stencil

Arguments

Type IntentOptional Attributes Name
type(tem_stencilHeader_type), intent(out) :: me

stencil header to be initialized
integer, intent(in) :: QQN

number of discrete velocities in the model (without the center one)
integer, intent(in), optional :: QQ

number of discrete velocities in the model (incl. the center one)
integer, intent(in), optional :: nElems

The number of elements to use this stencil for
logical, intent(in), optional :: useAll

use this stencil for all elements?
integer, intent(in), optional :: nDims
character(len=*), intent(in), optional :: label
integer, intent(in), optional :: cxDir(:,:)

private subroutine init_stencilElement(me, QQN, headerPos, tIDpos)

initialize stencil

Arguments

Type IntentOptional Attributes Name
type(tem_stencilElement_type), intent(out) :: me

stencil element type to be initialized
integer, intent(in) :: QQN

number of discrete velocities in the model (without the center one)
integer, intent(in), optional :: headerPos
integer, intent(in), optional :: tIDpos(:)