test_18 Subroutine

public subroutine test_18(error_cnt)

Arguments

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

report number of errors to caller

Description

Test the name matching options.


Variables

TypeVisibility AttributesNameInitial
type(json_core), public :: json
type(json_value), public, pointer:: p
integer, public :: ival
logical, public :: found
logical, public, dimension(4):: ok

Subroutines

subroutine go(iresult)

Arguments

Type IntentOptional AttributesName
integer, intent(in), dimension(4):: iresult

correct answers

Description

run test and get results