JSON file reading module author: P J Knight, CCFE, Culham Science Centre N/A This module uses a local copy of the freely-available FSON library, written by Joseph A. Levin and distributed via github, to enable PROCESS to read in information from JSON-formatted files. None
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | private, | parameter | :: | end_of_file | = | -1 | |
integer, | private, | parameter | :: | end_of_record | = | -2 | |
integer, | private, | parameter | :: | STATE_LOOKING_FOR_VALUE | = | 1 | |
integer, | private, | parameter | :: | STATE_IN_OBJECT | = | 2 | |
integer, | private, | parameter | :: | STATE_IN_PAIR_NAME | = | 3 | |
integer, | private, | parameter | :: | STATE_IN_PAIR_VALUE | = | 4 | |
integer, | private | :: | pushed_index | ||||
character(len=10), | private | :: | pushed_char |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | file | |||
integer, | intent(inout), | optional | :: | unit |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | unit |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | unit | |||
integer, | intent(inout), | optional | :: | digit_count |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | unit | |||
logical, | intent(out) | :: | eof | |||
logical, | intent(in), | optional | :: | skip_ws |
Initialise fson library module variables
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | unit | |||
type(fson_value), | pointer | :: | value |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | unit | |||
type(fson_value), | pointer | :: | parent |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | unit | |||
type(fson_value), | pointer | :: | array |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | unit | |||
character(len=*), | intent(in) | :: | chars |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(inout) | :: | unit | |||
type(fson_value), | pointer | :: | value |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character, | intent(inout) | :: | c |