choose_fmt_based_on Function

public function choose_fmt_based_on(filename) result(fmt)

Select a format string based on the file extension.

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	filename	Input filename

Return Value character(len=:), allocatable

Chosen format