find_column Function

public pure function find_column(key, field_names, ncols) result(idx)

Find column index by field name

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
character(len=64),	intent(in)			::	field_names(:)
integer,	intent(in)			::	ncols

Return Value integer