test_3 Subroutine

public subroutine test_3(error_cnt)

Arguments

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

Description

Read the file generated in test_2, and extract some data from it.


Variables

TypeVisibility AttributesNameInitial
integer, public :: ival
character(kind=json_CK,len=:), public, allocatable:: cval
real(kind=wp), public :: rval
type(json_file), public :: json
integer, public :: i
character(kind=json_CK,len=10), public :: str
real(kind=wp), public, dimension(:), allocatable:: rvec