fnStringCompare – faiNumber-Fortran

public pure subroutine fnStringCompare(firstString, secondString, output, error)

Compare two strings as decimal integers. This subroutine evaluates both, negative and positive values. There isn't a maximum length for the strings. Nonetheless, the strings can't be empty.

This subroutine ignores leading and trailing whitespaces.

This subroutine disregards leading zeroes.

Error code:
0 - no error
1 - empty string firstString(spaces only or 0 length)
2 - empty string secondString(spaces only or 0 length)
3 - bad format firstString
4 - bad format secondString

Arguments

Type	Intent		Name
character(len=*),	intent(in)	::	firstString	A string to be compared to the string `secondString`.
character(len=*),	intent(in)	::	secondString	A string to be compared to the string `firstString`.
integer(kind=k_int32),	intent(out)	::	output	An int32 value of 1 if the `firstString` is larger than the `secondString`, 0 if they are both equal, or -1 if the `firstString` is smaller than the `secondString`. This value may not be a correct value if an error has occurred during the comparison process.
integer(kind=k_int32),	intent(out)	::	error	An int32 value of 0 if no error was encountered. Otherwise, a true error code.

fnStringCompare Subroutine

Arguments