rb_irex_to_irloc Function

private function rb_irex_to_irloc(self, irex)

Convert extended row index to local row index

Type Bound

rowblock_type

Arguments

Type IntentOptional Attributes Name
class(rowblock_type), intent(in) :: self
integer, intent(in) :: irex

Return Value integer


Contents

Source Code

rb_irex_to_irloc

Source Code

  function rb_irex_to_irloc(self,irex)
    implicit none
    class(rowblock_type), intent(in) :: self
    integer, intent(in) :: irex
    integer :: rb_irex_to_irloc
    rb_irex_to_irloc=1+(irex-self%row_llim)
  end function rb_irex_to_irloc