parse_extension Subroutine

subroutine parse_extension(file_to_parse, file_or_extension, lnc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	file_to_parse
character(len=*),	intent(in)			::	file_or_extension
logical,	intent(out)			::	lnc