CapDriver_Main Program

Uses

  • program~~capdriver_main~~UsesGraph program~capdriver_main CapDriver_Main module~extdatautroot_gridcompmod ExtDataUtRoot_GridCompMod program~capdriver_main->module~extdatautroot_gridcompmod module~mapl MAPL program~capdriver_main->module~mapl mpi mpi program~capdriver_main->mpi module~extdatautroot_gridcompmod->module~mapl ESMF ESMF module~extdatautroot_gridcompmod->ESMF gFTL_StringStringMap gFTL_StringStringMap module~extdatautroot_gridcompmod->gFTL_StringStringMap iso_fortran_env iso_fortran_env module~extdatautroot_gridcompmod->iso_fortran_env module~maplshared MaplShared module~extdatautroot_gridcompmod->module~maplshared module~varspecdescriptionmod VarspecDescriptionMod module~extdatautroot_gridcompmod->module~varspecdescriptionmod module~varspecdescriptionvectormod VarspecDescriptionVectorMod module~extdatautroot_gridcompmod->module~varspecdescriptionvectormod netcdf netcdf module~extdatautroot_gridcompmod->netcdf module~esmf_cfiomod ESMF_CFIOMod module~mapl->module~esmf_cfiomod module~mapl_esmffieldbundleread MAPL_ESMFFieldBundleRead module~mapl->module~mapl_esmffieldbundleread module~mapl_esmffieldbundlewrite MAPL_ESMFFieldBundleWrite module~mapl->module~mapl_esmffieldbundlewrite module~mapl_fieldutils MAPL_FieldUtils module~mapl->module~mapl_fieldutils module~mapl_genericmod MAPL_GenericMod module~mapl->module~mapl_genericmod module~mapl_gridcompsmod MAPL_GridCompsMod module~mapl->module~mapl_gridcompsmod module~mapl_openmp_support MAPL_OpenMP_Support module~mapl->module~mapl_openmp_support module~mapl_profiler mapl_Profiler module~mapl->module~mapl_profiler module~mapl_stubcomponent MAPL_StubComponent module~mapl->module~mapl_stubcomponent module~mapl_varspecmiscmod MAPL_VarSpecMiscMod module~mapl->module~mapl_varspecmiscmod module~maplbase_mod MAPLBase_Mod module~mapl->module~maplbase_mod module~pfio pFIO module~mapl->module~pfio

Calls

program~~capdriver_main~~CallsGraph program~capdriver_main CapDriver_Main fargparsecli fargparsecli program~capdriver_main->fargparsecli none~run~18 MAPL_Cap%run program~capdriver_main->none~run~18 proc~mapl_abort MAPL_abort program~capdriver_main->proc~mapl_abort proc~mapl_verify MAPL_Verify program~capdriver_main->proc~mapl_verify none~run~18->proc~mapl_verify none~finalize_mpi MAPL_Cap%finalize_mpi none~run~18->none~finalize_mpi none~run_ensemble MAPL_Cap%run_ensemble none~run~18->none~run_ensemble proc~mapl_return MAPL_Return none~run~18->proc~mapl_return mpi_abort mpi_abort proc~mapl_abort->mpi_abort proc~mapl_throw_exception MAPL_throw_exception proc~mapl_verify->proc~mapl_throw_exception none~finalize_mpi->proc~mapl_return mpi_finalize mpi_finalize none~finalize_mpi->mpi_finalize proc~mapl_finalize MAPL_Finalize none~finalize_mpi->proc~mapl_finalize none~run_ensemble->proc~mapl_verify none~run_ensemble->proc~mapl_return none~create_member_subcommunicator MAPL_Cap%create_member_subcommunicator none~run_ensemble->none~create_member_subcommunicator none~finalize_io_clients_servers~2 MAPL_Cap%finalize_io_clients_servers none~run_ensemble->none~finalize_io_clients_servers~2 none~free_sub_comm SimpleCommSplitter%free_sub_comm none~run_ensemble->none~free_sub_comm none~initialize_io_clients_servers~2 MAPL_Cap%initialize_io_clients_servers none~run_ensemble->none~initialize_io_clients_servers~2 none~run_member MAPL_Cap%run_member none~run_ensemble->none~run_member proc~mapl_return->proc~mapl_throw_exception at at proc~mapl_return->at insert insert proc~mapl_return->insert none~create_member_subcommunicator->proc~mapl_verify none~create_member_subcommunicator->proc~mapl_return none~get_name~3 SplitCommunicator%get_name none~create_member_subcommunicator->none~get_name~3 none~get_subcommunicator SplitCommunicator%get_subcommunicator none~create_member_subcommunicator->none~get_subcommunicator none~split~3 SimpleCommSplitter%split none~create_member_subcommunicator->none~split~3 none~finalize_io_clients_servers~2->proc~mapl_return none~finalize~17 ServerManager%finalize none~finalize_io_clients_servers~2->none~finalize~17 none~finalize_io_clients_servers~2->none~get_name~3 none~get_splitcomm ServerManager%get_splitcomm none~finalize_io_clients_servers~2->none~get_splitcomm none~terminate ClientManager%terminate none~finalize_io_clients_servers~2->none~terminate mpi_comm_free mpi_comm_free none~free_sub_comm->mpi_comm_free none~initialize_io_clients_servers~2->proc~mapl_verify none~initialize_io_clients_servers~2->proc~mapl_return none~initialize~28 ServerManager%initialize none~initialize_io_clients_servers~2->none~initialize~28 none~run_member->proc~mapl_verify none~run_member->proc~mapl_return none~run_member->none~get_name~3 none~run_member->none~get_splitcomm none~run_member->none~get_subcommunicator none~run_model MAPL_Cap%run_model none~run_member->none~run_model proc~mapl_finalize->proc~mapl_verify proc~mapl_finalize->proc~mapl_return finalize_profiler finalize_profiler proc~mapl_finalize->finalize_profiler

Variables

Type Attributes Name Initial
character(len=*), parameter :: Iam = "CapDriver_Main"
integer :: status
type(MAPL_Cap) :: cap
type(MAPL_CapOptions) :: cap_options

Source Code

program CapDriver_Main
   use MPI
   use MAPL
   use ExtDataUtRoot_GridCompMod, only:  ROOT_SetServices => SetServices
   implicit none

   character(len=*), parameter :: Iam="CapDriver_Main"
   type (MAPL_Cap) :: cap
   type (MAPL_CapOptions) :: cap_options
   integer :: status

   cap_options = FargparseCLI()
   cap = MAPL_Cap('Root', ROOT_SetServices, cap_options = cap_options)

   call cap%run(_RC)

end program CapDriver_Main