assoc_list_nitems Function

public function assoc_list_nitems(a) result(n)

Arguments

Type	Intent	Optional	Attributes		Name
type(assoc_list_t),	intent(in)			::	a

Return Value integer

Contents

Source Code

assoc_list_nitems

Source Code

function assoc_list_nitems(a) result(n)
type(assoc_list_t), intent(in)    :: a
integer                           :: n

n = a%nitems
end function assoc_list_nitems