jf_test_2_mod Module

  1. jf_test_2.f90
  2. jf_test_2_mod
module~~jf_test_2_mod~~UsesGraph module~jf_test_2_mod jf_test_2_mod iso_fortran_env iso_fortran_env iso_fortran_env->module~jf_test_2_mod module~json_file_module json_file_module iso_fortran_env->module~json_file_module module~json_value_module json_value_module iso_fortran_env->module~json_value_module module~json_kinds json_kinds iso_fortran_env->module~json_kinds module~json_module json_module module~json_module->module~jf_test_2_mod module~json_file_module->module~json_module module~json_value_module->module~json_module module~json_value_module->module~json_file_module module~json_kinds->module~json_module module~json_kinds->module~json_file_module module~json_kinds->module~json_value_module module~json_parameters json_parameters module~json_kinds->module~json_parameters module~json_string_utilities json_string_utilities module~json_kinds->module~json_string_utilities module~json_parameters->module~json_module module~json_parameters->module~json_file_module module~json_parameters->module~json_value_module module~json_parameters->module~json_string_utilities module~json_string_utilities->module~json_file_module module~json_string_utilities->module~json_value_module
Help

Module for the second unit test.

HISTORY

  • Izaak Beekman : 2/18/2015 : Created (refactoried original json_example.f90 file)

Used By

module~~jf_test_2_mod~~UsedByGraph module~jf_test_2_mod jf_test_2_mod program~jf_test_2 jf_test_2 module~jf_test_2_mod->program~jf_test_2
Help

Variables

Subroutines


Variables

TypeVisibility AttributesNameInitial
character(len=*), public, parameter:: dir ='../files/'

working directory
character(len=*), public, parameter:: filename2 ='test2.json'

Subroutines

public subroutine add_variables_to_input(json, me, variable, units, frame, center, rdata, error_cnt)

Arguments

Type IntentOptional AttributesName
type(json_core), intent(inout) :: json
type(json_value), pointer:: me
character(len=*), intent(in) :: variable
character(len=*), intent(in) :: units
character(len=*), intent(in) :: frame
character(len=*), intent(in) :: center
real(kind=wp), intent(in), dimension(:):: rdata
integer, intent(inout) :: error_cnt

public subroutine test_2(error_cnt)

Populate a JSON structure and write it to a file.

Arguments

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

All Modules