private subroutine json_file_print_to_console(me)
Arguments
Type |
Intent | Optional |
Attributes | | Name | |
class(json_file), |
intent(inout) |
|
| :: |
me | |
Description
Print the JSON file to the console.
Variables
Type | Visibility |
Attributes | | Name | | Initial | |
character(kind=CK,len=:), |
public, |
allocatable | :: |
dummy | | | |
Source Code
subroutine json_file_print_to_console(me)
implicit none
class(json_file),intent(inout) :: me
character(kind=CK,len=:),allocatable :: dummy
call json_value_print(me%p,iunit=output_unit,str=dummy,indent=1,colon=.true.)
end subroutine json_file_print_to_console