This module, fnBinaryUtil128
contains procedures for working with binary strings and int128 data type.
Note
This module treats binary strings as bit values represented by binary digits and not real numbers. Thus, binary strings parse by this module will be converted to int128 values as if they are real bit values represented by binary digits.
Note
Unless stated otherwise, procedures of this module are pure procedures.
Uses
Functions
public pure function binaryInt128OrSmaller(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 binary 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 binaryToInt128(input, output, error, startpos, endpos)
- Author
- Khang Hoang Nguyen
- Since
- 1.0.0.f
Parse the input
string as bits represented by binary digits to an int128 value.
Arguments
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | input | A string to be parsed as a binary 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 binaryToInt128TrueError(input, output, error, startpos, endpos)
- Author
- Khang Hoang Nguyen
- Since
- 1.0.0.f
Parse the input
string as bits represented by binary digits to an int128 value.
Arguments
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | input | A string to be parsed as a binary 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 binaryCompareAsInt128(firstString, secondString, output, error)
- Author
- Khang Hoang Nguyen
- Since
- 1.0.0.f
Compare two strings as binary 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 |