init Interface

  1. tem_stencil_module.f90
  2. tem_stencil_module
  3. init

private interface init

Calls

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

Contents

Module Procedures


Module Procedures

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

initialize stencil

Arguments

TypeIntentOptionalAttributesName
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

TypeIntentOptionalAttributesName
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(:)