rename Subroutine

public subroutine rename(json, p, finished)

Arguments

Type IntentOptional AttributesName
class(json_core), intent(inout) :: json
type(json_value), intent(in), pointer:: p
logical, intent(out) :: finished

Description

change all "name" variable values to "Fred"


Variables

TypeVisibility AttributesNameInitial
integer, public :: var_type
character(kind=json_CK,len=:), public, allocatable:: str
logical, public :: found