test_1 Subroutine

public subroutine test_1(error_cnt)

Arguments

Type IntentOptional AttributesName
integer, intent(out) :: error_cnt

Description

Read a sample JSON file and retrieve some data from it


Variables

TypeVisibility AttributesNameInitial
type(json_file), public :: json

the JSON structure read from the file

type(json_value), public, pointer:: p

a pointer for low-level manipulations

type(json_core), public :: core

factory for manipulating json_value pointers

integer, public :: ival
character(kind=json_CK,len=:), public, allocatable:: cval
real(kind=wp), public :: rval
logical, public :: found