initialize_io_clients_servers Subroutine

public subroutine initialize_io_clients_servers(this, comm, unusable, rc)

Uses

  • proc~~initialize_io_clients_servers~~UsesGraph proc~initialize_io_clients_servers ExtDataDriver%initialize_io_clients_servers module~mapl_cfiomod MAPL_CFIOMod proc~initialize_io_clients_servers->module~mapl_cfiomod ESMF ESMF module~mapl_cfiomod->ESMF gFTL_IntegerVector gFTL_IntegerVector module~mapl_cfiomod->gFTL_IntegerVector iso_c_binding iso_c_binding module~mapl_cfiomod->iso_c_binding iso_fortran_env iso_fortran_env module~mapl_cfiomod->iso_fortran_env module~esmf_cfiocollectionmod ESMF_CFIOCollectionMod module~mapl_cfiomod->module~esmf_cfiocollectionmod module~esmf_cfiocollectionvectormod ESMF_CFIOCollectionVectorMod module~mapl_cfiomod->module~esmf_cfiocollectionvectormod module~esmf_cfiofilemod ESMF_CFIOFileMod module~mapl_cfiomod->module~esmf_cfiofilemod module~esmf_cfiomod ESMF_CFIOMod module~mapl_cfiomod->module~esmf_cfiomod module~esmf_cfioutilmod ESMF_CFIOUtilMod module~mapl_cfiomod->module~esmf_cfioutilmod module~esmfl_mod ESMFL_MOD module~mapl_cfiomod->module~esmfl_mod module~mapl_abstractregriddermod MAPL_AbstractRegridderMod module~mapl_cfiomod->module~mapl_abstractregriddermod module~mapl_basemod MAPL_BaseMod module~mapl_cfiomod->module~mapl_basemod module~mapl_commsmod MAPL_CommsMod module~mapl_cfiomod->module~mapl_commsmod module~mapl_configmod MAPL_ConfigMod module~mapl_cfiomod->module~mapl_configmod module~mapl_constants MAPL_Constants module~mapl_cfiomod->module~mapl_constants module~mapl_exceptionhandling MAPL_ExceptionHandling module~mapl_cfiomod->module~mapl_exceptionhandling module~mapl_gridmanagermod MAPL_GridManagerMod module~mapl_cfiomod->module~mapl_gridmanagermod module~mapl_iomod MAPL_IOMod module~mapl_cfiomod->module~mapl_iomod module~mapl_memutilsmod MAPL_MemUtilsMod module~mapl_cfiomod->module~mapl_memutilsmod module~mapl_newregriddermanager mapl_NewRegridderManager module~mapl_cfiomod->module~mapl_newregriddermanager module~mapl_regriddermanagermod MAPL_RegridderManagerMod module~mapl_cfiomod->module~mapl_regriddermanagermod module~mapl_regridmethods mapl_RegridMethods module~mapl_cfiomod->module~mapl_regridmethods module~mapl_shmemmod MAPL_ShmemMod module~mapl_cfiomod->module~mapl_shmemmod module~mapl_sortmod MAPL_SortMod module~mapl_cfiomod->module~mapl_sortmod module~mapl_stringtemplate MAPL_StringTemplate module~mapl_cfiomod->module~mapl_stringtemplate module~pfio pFIO module~mapl_cfiomod->module~pfio mpi mpi module~mapl_cfiomod->mpi

Type Bound

ExtDataDriver

Arguments

Type IntentOptional Attributes Name
class(ExtDataDriver), intent(inout), target :: this
integer, intent(in) :: comm
class(KeywordEnforcer), intent(in), optional :: unusable
integer, intent(out), optional :: rc

Calls

proc~~initialize_io_clients_servers~~CallsGraph proc~initialize_io_clients_servers ExtDataDriver%initialize_io_clients_servers none~initialize~10 ServerManager%initialize proc~initialize_io_clients_servers->none~initialize~10 proc~mapl_return MAPL_Return proc~initialize_io_clients_servers->proc~mapl_return proc~mapl_verify MAPL_Verify proc~initialize_io_clients_servers->proc~mapl_verify none~initialize~10->proc~mapl_return none~initialize~10->proc~mapl_verify interface~init_io_clientmanager init_IO_ClientManager none~initialize~10->interface~init_io_clientmanager interface~mapl_assert MAPL_Assert none~initialize~10->interface~mapl_assert mpi_barrier mpi_barrier none~initialize~10->mpi_barrier mpi_comm_rank mpi_comm_rank none~initialize~10->mpi_comm_rank mpi_comm_size mpi_comm_size none~initialize~10->mpi_comm_size none~add_group SimpleCommSplitter%add_group none~initialize~10->none~add_group none~connect_to_client DirectoryService%connect_to_client none~initialize~10->none~connect_to_client none~connect_to_server DirectoryService%connect_to_server none~initialize~10->none~connect_to_server none~current~12 ClientManager%current none~initialize~10->none~current~12 none~get_name SplitCommunicator%get_name none~initialize~10->none~get_name none~get_subcommunicator SplitCommunicator%get_subcommunicator none~initialize~10->none~get_subcommunicator none~next~62 ClientManager%next none~initialize~10->none~next~62 none~publish DirectoryService%publish none~initialize~10->none~publish none~set_current ClientManager%set_current none~initialize~10->none~set_current none~set_server_size ClientManager%set_server_size none~initialize~10->none~set_server_size none~split~3 SimpleCommSplitter%split none~initialize~10->none~split~3 proc~i_to_string i_to_string none~initialize~10->proc~i_to_string start start none~initialize~10->start at at proc~mapl_return->at insert insert proc~mapl_return->insert proc~mapl_throw_exception MAPL_throw_exception proc~mapl_return->proc~mapl_throw_exception proc~mapl_verify->proc~mapl_throw_exception

Called by

proc~~initialize_io_clients_servers~~CalledByGraph proc~initialize_io_clients_servers ExtDataDriver%initialize_io_clients_servers proc~run~12 ExtDataDriver%run proc~run~12->proc~initialize_io_clients_servers program~extdata_driver ExtData_Driver program~extdata_driver->proc~run~12

Source Code

   subroutine initialize_io_clients_servers(this, comm, unusable, rc)
     use MAPL_CFIOMod
     class (ExtDataDriver), target, intent(inout) :: this
     integer, intent(in) :: comm
     class (KeywordEnforcer), optional, intent(in) :: unusable
     integer, optional, intent(out) :: rc
  
     integer :: status

     _UNUSED_DUMMY(unusable)

     call this%cap_server%initialize(comm, &
         application_size=this%cap_options%npes_model, &
         nodes_input_server=this%cap_options%nodes_input_server, &
         nodes_output_server=this%cap_options%nodes_output_server, &
         npes_input_server=this%cap_options%npes_input_server, &
         npes_output_server=this%cap_options%npes_output_server, &
         oserver_type=this%cap_options%oserver_type, &
         npes_backend_pernode=this%cap_options%npes_backend_pernode, &
         isolate_nodes = this%cap_options%isolate_nodes, &
         fast_oclient  = this%cap_options%fast_oclient, &
         with_profiler = this%cap_options%with_io_profiler, &
         rc=status) 
     _VERIFY(status)
     _RETURN(_SUCCESS)

   end subroutine initialize_io_clients_servers