This module, fnOctalUtil128 contains procedures for working with octal strings and int128 data type.
Note
This module treats octal strings as bit values represented by octal digits and not real numbers. Thus, octal strings parse by this module will be converted to int128 values as if they are real bit values represented by octal digits.
Note
Unless stated otherwise, procedures of this module are pure procedures.
Uses
Functions
public pure function octalInt128OrSmaller(firstString, secondString) result(int32Out)- Author
- Khang Hoang Nguyen
- Since
- 1.0.0.f
Compare two strings bases on the content of the strings reference to int128 values. If the strings are valid octal strings that can be parsed to int128 values then they will be compared base on their int128 values. Otherwise, the strings will be compared base on the priority ranking order below.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | firstString | A string to be compared to the string | ||
| character(len=*), | intent(in) | :: | secondString | A string to be compared to the string |
Return Value integer(kind=k_int32)
Subroutines
public pure subroutine octalToInt128(input, output, error, startpos, endpos)- Author
- Khang Hoang Nguyen
- Since
- 1.0.0.f
Parse the input string as bits represented by octal digits to an int128 value.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | input | A string to be parsed as an octal string to an int128 value. | ||
| integer(kind=k_int128), | intent(out) | :: | output | An int128 value of the | ||
| logical, | intent(out) | :: | error | A value of | ||
| integer(kind=k_int32), | intent(in), | optional | :: | startpos | An int32 value of the position(inclusive) of where to start parsing. | |
| integer(kind=k_int32), | intent(in), | optional | :: | endpos | An int32 value of the position(inclusive) of where to end parsing. |
public pure subroutine octalToInt128TrueError(input, output, error, startpos, endpos)- Author
- Khang Hoang Nguyen
- Since
- 1.0.0.f
Parse the input string as bits represented by octal digits to an int128 value.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | input | A string to be parsed as an octal string to an int128 value. | ||
| integer(kind=k_int128), | intent(out) | :: | output | An int128 value of the | ||
| integer(kind=k_int32), | intent(out) | :: | error | An int32 value of 0 on successful parse cases or a true error code on unsuccessful parse cases. | ||
| integer(kind=k_int32), | intent(in), | optional | :: | startpos | An int32 value of the position(inclusive) of where to start parsing. | |
| integer(kind=k_int32), | intent(in), | optional | :: | endpos | An int32 value of the position(inclusive) of where to end parsing. |
public pure subroutine octalCompareAsInt128(firstString, secondString, output, error)- Author
- Khang Hoang Nguyen
- Since
- 1.0.0.f
Compare two strings as octal string by parsing them to int128 values first.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | firstString | A string to be compared to the string | ||
| character(len=*), | intent(in) | :: | secondString | A string to be compared to the string | ||
| integer(kind=k_int32), | intent(out) | :: | output | An int32 value of 1 if the | ||
| logical, | intent(out) | :: | error | A value of |