atl_read_precice Subroutine

  1. atl_writePrecice_module.f90
  2. atl_writePrecice_module
  3. atl_read_precice

public subroutine atl_read_precice(stFunList, tree)

loop over linked list of spacetimefunction set the current to head loop over all shapes of that spacetimefunction check if there is a precice kind get the number of unquie points ( xyz should be same number)

Arguments

TypeIntentOptionalAttributesName
type(tem_st_fun_linkedList_type), intent(inout), target:: stFunList

This list contains all space-time-function
type(treelmesh_type), intent(in) :: tree

treelm mesh

Calls

proc~~atl_read_precice~~CallsGraph proc~atl_read_precice atl_read_precice tem_precice_set_vertices_pos tem_precice_set_vertices_pos proc~atl_read_precice->tem_precice_set_vertices_pos

Called by

proc~~atl_read_precice~~CalledByGraph proc~atl_read_precice atl_read_precice proc~atl_init_precice atl_init_precice proc~atl_init_precice->proc~atl_read_precice proc~atl_initialize atl_initialize proc~atl_initialize->proc~atl_init_precice 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
real(kind=rk), private, allocatable:: points(:,:)
real(kind=rk), private, allocatable:: serializedPnts(:)
integer, private :: iLevel
integer, private :: iCoord
integer, private :: iPnt
integer, private :: i
integer, private :: iStFun
integer, private :: nPnts
type(tem_precice_coupling_type), private, pointer:: preciceCpl=> NULL()
type(tem_st_fun_listElem_type), private, pointer:: current