array_list_remove_last Subroutine

private subroutine array_list_remove_last(this, item)

Arguments

Type IntentOptional AttributesName
class(array_list), intent(inout) :: this
class(*), intent(in) :: item

An item, the last occurrence of which will be removed from the list

Description

Remove the last occurrence of the specified item from the list, moving all succeeding items back by one position. No action is taken if the item is not present.


Source Code

  subroutine array_list_remove_last(this, item)
    !* Author: Chris MacMackin
    !  Date: March 2016
    !
    ! Remove the last occurrence of the specified item from the list,
    ! moving all succeeding items back by one position. No action is
    ! taken if the item is not present.
    !
    class(array_list), intent(inout) :: this
    class(*), intent(in) :: item
      !! An item, the last occurrence of which will be removed from
      !! the list
  end subroutine array_list_remove_last