childToStencil Function

private function childToStencil(childCoord) result(stencilCoord)

Convert a child coordinate {0,1} to non-zero stencil direction {-1,1}

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: childCoord

Return Value integer


Called by

proc~~childtostencil~~CalledByGraph proc~childtostencil childToStencil proc~tem_find_bcs_fromcoarser tem_find_BCs_fromCoarser proc~tem_find_bcs_fromcoarser->proc~childtostencil proc~add_all_virtual_children add_all_virtual_children proc~add_all_virtual_children->proc~tem_find_bcs_fromcoarser proc~add_all_virtual_children->proc~add_all_virtual_children proc~identify_local_element identify_local_element proc~identify_local_element->proc~add_all_virtual_children proc~identify_halo identify_halo proc~identify_halo->proc~identify_local_element proc~single_process_element single_process_element proc~single_process_element->proc~identify_local_element

Source Code

  function childToStencil( childCoord ) result( stencilCoord)
    ! ---------------------------------------------------------------------------
    integer, intent(in) :: childCoord
    integer :: stencilCoord
    ! ---------------------------------------------------------------------------

    stencilCoord = (childCoord*2) -1

  end function childToStencil