fin_env Subroutine

  1. env_module.f90
  2. env_module
  3. fin_env

public subroutine fin_env()

Finalize the environment, should be the very last call in the program, and includes the call of MPI_Finalize.

Arguments

None

Calls

proc~~fin_env~~CallsGraph proc~fin_env fin_env mpi_finalize mpi_finalize proc~fin_env->mpi_finalize

Called by

proc~~fin_env~~CalledByGraph proc~fin_env fin_env program~tem_spacetime_fun_test tem_spacetime_fun_test program~tem_spacetime_fun_test->proc~fin_env program~tem_sparta_test tem_sparta_test program~tem_sparta_test->proc~fin_env program~tem_variable_evaltype_test tem_variable_evaltype_test program~tem_variable_evaltype_test->proc~fin_env program~tem_varsys_stfunvar_test tem_varSys_stfunVar_test program~tem_varsys_stfunvar_test->proc~fin_env program~tem_varsys_derivevar_test tem_varSys_deriveVar_test program~tem_varsys_derivevar_test->proc~fin_env program~tem_variable_extract_test tem_variable_extract_test program~tem_variable_extract_test->proc~fin_env program~tem_varsys_statevar_test tem_varSys_stateVar_test program~tem_varsys_statevar_test->proc~fin_env proc~tem_finalize tem_finalize proc~tem_finalize->proc~fin_env program~tem_varsys_test tem_varSys_test program~tem_varsys_test->proc~fin_env program~tem_variable_combine_test tem_variable_combine_Test program~tem_variable_combine_test->proc~fin_env program~tem_face_test~3 tem_face_test program~tem_face_test~3->proc~fin_env program~tem_face_test tem_face_test program~tem_face_test->proc~fin_env program~tem_logical_opertor_test tem_logical_opertor_test program~tem_logical_opertor_test->proc~fin_env program~tem_varsys_opvar_test tem_varSys_opVar_test program~tem_varsys_opvar_test->proc~fin_env proc~check_serial_singlelevel_facedesc check_serial_singlelevel_faceDesc proc~check_serial_singlelevel_facedesc->proc~tem_finalize program~bin_search_test bin_search_test program~bin_search_test->proc~tem_finalize program~tem_face_test~2 tem_face_test program~tem_face_test~2->proc~check_serial_singlelevel_facedesc

Contents

Source Code

fin_env

Source Code

  subroutine fin_env()
    ! ---------------------------------------------------------------------------
    integer :: iError
    ! ---------------------------------------------------------------------------
    call MPI_Finalize(iError)
  end subroutine fin_env