Skip to content

Commit 0c344a6

Browse files
committed
minor correction in a comment.
1 parent 3789b3c commit 0c344a6

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/json_value_module.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -143,13 +143,13 @@ module json_value_module
143143
!### Usage
144144
!````fortran
145145
! program test
146-
! use json_module
146+
! use json_module, wp=>json_RK
147147
! implicit none
148148
! type(json_core) :: json !<--have to declare this
149149
! type(json_value),pointer :: p
150150
! call json%create_object(p,'') !create the root
151151
! call json%add(p,'year',1805) !add some data
152-
! call json%add(p,'value',1.0_RK) !add some data
152+
! call json%add(p,'value',1.0_wp) !add some data
153153
! call json%print(p,'test.json') !write it to a file
154154
! call json%destroy(p) !cleanup
155155
! end program test

0 commit comments

Comments
 (0)