shr_string_mod Module

Uses

Functions

public function shr_string_countChar(str, char, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	str
character(len=1),	intent(in)			::	char
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

Return Value integer

public function shr_string_toUpper(str)

Arguments

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

Return Value character(len=len)

public function shr_string_toLower(str)

Arguments

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

Return Value character(len=len)

public function shr_string_getParentDir(str)

Arguments

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

Return Value character(len=len)

public function shr_string_lastIndex(string, substr, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	string
character(len=*),	intent(in)			::	substr
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

Return Value integer

public function shr_string_endIndex(string, substr, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	string
character(len=*),	intent(in)			::	substr
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

Return Value integer

public function shr_string_convert_tabs(str_input, rc) result(str_output)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	str_input
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

Return Value character(len=len)

public function shr_string_listIsValid(list, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	list
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

Return Value logical

public function shr_string_listGetIndexF(string, fldStr)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	string
character(len=*),	intent(in)			::	fldStr

Return Value integer

public function shr_string_listGetNum(str)

Arguments

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

Return Value integer

public function shr_string_listFromSuffixes(suffixes, strBase) result(retString)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	suffixes(:)
character(len=*),	intent(in)			::	strBase

Return Value character(len=:), allocatable

public function shr_string_listCreateField(numFields, strBase) result(retString)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=SHR_KIND_IN),	intent(in)			::	numFields
character(len=*),	intent(in)			::	strBase

Return Value character(len=SHR_KIND_CXX)

Subroutines

public subroutine shr_string_leftalign_and_convert_tabs(str, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	str
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_alphanum(str, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	str
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_betweenTags(string, startTag, endTag, substr, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	string
character(len=*),	intent(in)			::	startTag
character(len=*),	intent(in)			::	endTag
character(len=*),	intent(out)			::	substr
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_parseCFtunit(string, unit, bdate, bsec, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	string
character(len=*),	intent(out)			::	unit
integer(kind=SHR_KIND_IN),	intent(out)			::	bdate
real(kind=SHR_KIND_R8),	intent(out)			::	bsec
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_clean(string, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	string
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listGetName(list, k, name, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	list
integer(kind=SHR_KIND_IN),	intent(in)			::	k
character(len=*),	intent(out)			::	name
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listIntersect(list1, list2, listout, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	list1
character(len=*),	intent(in)			::	list2
character(len=*),	intent(out)			::	listout
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listUnion(list1, list2, listout, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	list1
character(len=*),	intent(in)			::	list2
character(len=*),	intent(out)			::	listout
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listDiff(list1, list2, listout, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	list1
character(len=*),	intent(in)			::	list2
character(len=*),	intent(out)			::	listout
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listMerge(list1, list2, listout, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	list1
character(len=*),	intent(in)			::	list2
character(len=*),	intent(out)			::	listout
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listAppend(list, listadd, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	list
character(len=*),	intent(in)			::	listadd
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listPrepend(listadd, list, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	listadd
character(len=*),	intent(inout)			::	list
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listGetIndex(string, fldStr, kFld, print, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	string
character(len=*),	intent(in)			::	fldStr
integer(kind=SHR_KIND_IN),	intent(out)			::	kFld
logical,	intent(in),	optional		::	print
integer(kind=SHR_KIND_IN),	intent(out),	optional		::	rc

public subroutine shr_string_listSetDel(cflag)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	cflag

public subroutine shr_string_listGetDel(del)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(out)			::	del

public subroutine shr_string_listAddSuffix(list, suffix, new_list)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	list
character(len=*),	intent(in)			::	suffix
character(len=*),	intent(out)			::	new_list

public subroutine shr_string_setAbort(flag)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(in)			::	flag

public subroutine shr_string_setDebug(iFlag)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=SHR_KIND_IN),	intent(in)			::	iFlag