module integer_vector_tests
! Module to test dynamic vector template on
! integers.

use pfunit_mod

use shr_log_mod, only: OOBMsg => shr_log_OOBMsg

#define TYPE_NAME integer
#define TYPE_DECL integer
#define VECTOR_NAME integer_vector

use dynamic_vector_integer, only: &
     integer_vector

implicit none

integer, parameter :: test_array(3) = [ 3, 2, 1 ]

integer, parameter :: test_array_2(5) = [ 4, 5, 6, 7, 8 ]

integer, parameter :: new_val = -1

contains

#include "dynamic_vector_base_tests.inc"

end module integer_vector_tests
