key_iterator – flist

interface
private subroutine key_iterator(key, value, done)

Type	Intent	Attributes		Name
class(*),	intent(in)		::	key	the node key
class(*),		pointer	::	value	pointer to the node value
logical,	intent(out)		::	done	set to true to stop traversing

for traversing all keys in a list