add_if_exists Subroutine

public subroutine add_if_exists(dir, filename, files, n)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	dir
character(len=*),	intent(in)			::	filename
character(len=*),	intent(inout)			::	files(:)
integer,	intent(inout)			::	n