atl_store_bcVarPos Subroutine

  1. atl_bc_header_module.f90
  2. atl_bc_header_module
  3. atl_store_bcVarPos

public subroutine atl_store_bcVarPos(bc, varSys)

Routine to store position of user variable defined state and state_gradient boundary variable in bc(iBC)%state(iVar)%varPos and bc(iBC)%state_gradient

VK if (mod(iVar,2)==1) then VK bc(iBC)%state_gradient(iVar,1)%varPos = user_varPos VK else VK end if

Arguments

TypeIntentOptionalAttributesName
type(atl_boundary_type), intent(inout) :: bc(:)

Array of boundary conditions contains varDict with same size as state variables
type(tem_varSys_type), intent(in) :: varSys

Global variable system

Calls

proc~~atl_store_bcvarpos~~CallsGraph proc~atl_store_bcvarpos atl_store_bcVarPos proc~tem_abort tem_abort proc~atl_store_bcvarpos->proc~tem_abort interface~positionofval~2 positionofval proc~atl_store_bcvarpos->interface~positionofval~2

Called by

proc~~atl_store_bcvarpos~~CalledByGraph proc~atl_store_bcvarpos atl_store_bcVarPos proc~atl_initialize atl_initialize proc~atl_initialize->proc~atl_store_bcvarpos proc~atl_initialize_program atl_initialize_program proc~atl_initialize_program->proc~atl_initialize program~atl_harvesting atl_harvesting program~atl_harvesting->proc~atl_initialize program~ateles ateles program~ateles->proc~atl_initialize_program

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iBC
integer, private :: iVar
integer, private :: nBCs
integer, private :: user_varPos
character(len=labelLen), private :: user_varName