assign_val Interface

public interface assign_val

Interface for assigning a value to a variable

Module Procedures

private subroutine assignI(buffer, variable, found, keyword, fs)

Assign an integer to variable

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	buffer	Input buffer
integer,	intent(out)			::	variable	Variable to assign data to
integer,	intent(inout)			::	found	Count for finding variable
character(len=*),	intent(in),	optional		::	keyword	Keyword to start from
character(len=1),	intent(in),	optional		::	fs	Field separator

private subroutine assignR(buffer, variable, found, keyword, fs)

Assign a real to variable

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	buffer	Input buffer
real(kind=real32),	intent(out)			::	variable	Variable to assign data to
integer,	intent(inout)			::	found	Count for finding variable
character(len=*),	intent(in),	optional		::	keyword	Keyword to start from
character(len=1),	intent(in),	optional		::	fs	Field separator

private subroutine assignS(buffer, variable, found, keyword, fs)

Assign a string to variable

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	buffer	Input buffer
character(len=*),	intent(out)			::	variable	Variable to assign data to
integer,	intent(inout)			::	found	Count for finding variable
character(len=*),	intent(in),	optional		::	keyword	Keyword to start from
character(len=1),	intent(in),	optional		::	fs	Field separator

private subroutine assignL(buffer, variable, found, keyword, fs)

Assign a logical to variable (T/t/1 and F/f/0 accepted)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	buffer	Input buffer
logical,	intent(out)			::	variable	Variable to assign data to
integer,	intent(inout)			::	found	Count for finding variable
character(len=*),	intent(in),	optional		::	keyword	Keyword to start from
character(len=1),	intent(in),	optional		::	fs	Field separator