jf_test_3 Program

program~~jf_test_3~~UsesGraph program~jf_test_3 jf_test_3 module~jf_test_3_mod jf_test_3_mod module~jf_test_3_mod->program~jf_test_3 iso_fortran_env iso_fortran_env iso_fortran_env->module~jf_test_3_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_3_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


Third unit test.

Calls

program~~jf_test_3~~CallsGraph program~jf_test_3 jf_test_3 proc~test_3 test_3 program~jf_test_3->proc~test_3
Help

Source Code


Variables

Type AttributesNameInitial
integer :: n_errors

Source Code

program jf_test_3

    !! Third unit test.

    use jf_test_3_mod , only: test_3
    implicit none
    integer :: n_errors
    n_errors = 0
    call test_3(n_errors)
    if (n_errors /= 0) stop 1

end program jf_test_3