Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(json_value), | intent(in), | pointer | :: | me |
number of children
Count the number of children.
pure function json_count(me) result(count)
implicit none
integer(IK) :: count !! number of children
type(json_value),pointer,intent(in) :: me
count = me%n_children
end function json_count