jf_test_2 Program

program~~jf_test_2~~UsesGraph program~jf_test_2 jf_test_2 module~jf_test_2_mod jf_test_2_mod module~jf_test_2_mod->program~jf_test_2 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


Second unit test.

Calls

program~~jf_test_2~~CallsGraph program~jf_test_2 jf_test_2 proc~test_2 test_2 program~jf_test_2->proc~test_2 proc~add_variables_to_input add_variables_to_input proc~test_2->proc~add_variables_to_input
Help

Source Code


Variables

Type AttributesNameInitial
integer :: n_errors

Source Code

program jf_test_2

    !! Second unit test.

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

end program jf_test_2