String conversion

The rts subroutine can be imported from FoX_common. In its simplest form, it is called in this fashion:

call rts(string, data)

string is a simple Fortran string (probably retrieved from an XML file.)

data is any native Fortran datatype: logical, character, integer, real, double precision, complex, double complex, and may be a scalar, 1D or 2D array.

rts will attempt to parse the contents of string into the appropriate datatype, and return the value in data.

Additional information or error handling is accomplished with the following optional arguments:

num

num is an integer; on returning from the function it indicates the number of data items read before either
* an error occurred * the string was exhausted of data items
* data was filled.

iostat

iostat is an integer, which on return from the function has the values:

• 0 for no problems
• -1 if too few elements were found in string to fill up data
• 1 if data was filled, but there were still data items left in string
• 2 if the characters found in string could not be converted to the appropriate type for data.

NB if iostat is not specified, and a non-zero value is returned, then the program will stop with an error message.

String formatting

When string is expected to be an array of strings, the following options are used to break string into its constituent elements:

• By default it is assumed that the elements are separated by whitespace, and that multiple whitespace characters are not significant. No zero-length elements are possible, nor are elements containing whitespace.

• An optional argument, separator may be specified, which is a single character. In this case, each element consists of all characters between subsequent occurences of the separator. Zero-length elements are possible, but no escaping mechanism is possible.

• Alternatively, an optional logical argument csv may be specified. In this case, the value of delimiter is ignored, and the string is parsed as a Comma-Separated-Value string, according to RFC 4180.

Numerical formatting.

Numbers are expected to be formatted according to the usual conventions for Fortran input.

Complex number formatting.

Complex numbers may be formatted according to either normal Fortran conventions (comma-separated pairs) or CMLComp conventions

Logical variable formatting.

Logical variables must be encoded according to the conventions of XML Schema Datatypes - that is, True may be written as "true" or "1", and False may be written as "false" or "0".