tem_init_faceList Subroutine

private subroutine tem_init_faceList(faceList)

Subroutine to initialize the dyanmic content of a face list.

Arguments

Type IntentOptional Attributes Name
type(tem_faceList_type), intent(inout) :: faceList

The face list to initialize.


Calls

proc~~tem_init_facelist~~CallsGraph proc~tem_init_facelist tem_init_faceList interface~init~22 init proc~tem_init_facelist->interface~init~22 proc~init_ga2d_real init_ga2d_real interface~init~22->proc~init_ga2d_real

Called by

proc~~tem_init_facelist~~CalledByGraph proc~tem_init_facelist tem_init_faceList proc~tem_get_faces tem_get_faces proc~tem_get_faces->proc~tem_init_facelist proc~tem_collect_faces tem_collect_faces proc~tem_collect_faces->proc~tem_get_faces proc~tem_build_face_info tem_build_face_info proc~tem_build_face_info->proc~tem_collect_faces

Contents

Source Code


Source Code

  subroutine tem_init_faceList( faceList )
    ! --------------------------------------------------------------------------
    !> The face list to initialize.
    type(tem_faceList_type), intent(inout) :: faceList
    ! --------------------------------------------------------------------------

    call init( me = faceList%faceId, length = 32 )
    call init( me = faceList%rightElemId, length = 32 )
    call init( me = faceList%leftElemPos, length = 32 )
    call init( me = faceList%rightElemPos, length = 32 )
    call init( me = faceList%leftPrp, length = 32 )
    call init( me = faceList%rightPrp, length = 32 )

  end subroutine tem_init_faceList