monitor_set_GetIndex Function

private impure function monitor_set_GetIndex(this, name) result(loc)

Returns the ID of a monitor identified by name.

Type Bound

monitor_set

Arguments

Type IntentOptional Attributes Name
class(monitor_set), intent(inout) :: this

Set of monitor objects
character(len=*), intent(in) :: name

Name of the monitor

Return Value integer

Monitor ID


Calls

proc~~monitor_set_getindex~~CallsGraph proc~monitor_set_getindex monitor_set%monitor_set_GetIndex none~get~3 hashtbl_obj%Get proc~monitor_set_getindex->none~get~3 proc~hashtbl_obj_hashstring hashtbl_obj%hashtbl_obj_HashString proc~monitor_set_getindex->proc~hashtbl_obj_hashstring proc~hashtbl_obj_get_int4 hashtbl_obj%hashtbl_obj_Get_int4 none~get~3->proc~hashtbl_obj_get_int4 proc~hashtbl_obj_get_int8 hashtbl_obj%hashtbl_obj_Get_int8 none~get~3->proc~hashtbl_obj_get_int8 proc~hashtbl_obj_get_real_dp hashtbl_obj%hashtbl_obj_Get_real_dp none~get~3->proc~hashtbl_obj_get_real_dp proc~hashtbl_obj_get_real_sp hashtbl_obj%hashtbl_obj_Get_real_sp none~get~3->proc~hashtbl_obj_get_real_sp none~get~2 sllist_obj%Get proc~hashtbl_obj_get_int4->none~get~2 proc~hashtbl_obj_get_int8->none~get~2 proc~hashtbl_obj_get_real_dp->none~get~2 proc~hashtbl_obj_get_real_sp->none~get~2 proc~sllist_obj_get_int4 sllist_obj%sllist_obj_Get_int4 none~get~2->proc~sllist_obj_get_int4 proc~sllist_obj_get_int8 sllist_obj%sllist_obj_Get_int8 none~get~2->proc~sllist_obj_get_int8 proc~sllist_obj_get_real_dp sllist_obj%sllist_obj_Get_real_dp none~get~2->proc~sllist_obj_get_real_dp proc~sllist_obj_get_real_sp sllist_obj%sllist_obj_Get_real_sp none~get~2->proc~sllist_obj_get_real_sp proc~sllist_obj_get_int4->proc~sllist_obj_get_int4 proc~sllist_obj_get_int8->proc~sllist_obj_get_int8 proc~sllist_obj_get_real_dp->proc~sllist_obj_get_real_dp proc~sllist_obj_get_real_sp->proc~sllist_obj_get_real_sp

Called by

proc~~monitor_set_getindex~~CalledByGraph proc~monitor_set_getindex monitor_set%monitor_set_GetIndex proc~monitor_set_set monitor_set%monitor_set_Set proc~monitor_set_set->proc~monitor_set_getindex proc~cdifs_obj_advancesolutioncorrector cdifs_obj_AdvanceSolutionCorrector proc~cdifs_obj_advancesolutioncorrector->proc~monitor_set_set proc~cdifs_obj_flowupdatemonitor cdifs_obj_FlowUpdateMonitor proc~cdifs_obj_flowupdatemonitor->proc~monitor_set_set proc~cdifs_obj_monitor cdifs_obj_Monitor proc~cdifs_obj_monitor->proc~monitor_set_set proc~cdifs_obj_monitor->proc~cdifs_obj_flowupdatemonitor proc~respart_set_updatemonitor ResPart_set%ResPart_set_UpdateMonitor proc~cdifs_obj_monitor->proc~respart_set_updatemonitor proc~cdifs_obj_preparesolvermonitor cdifs_obj_PrepareSolverMonitor proc~cdifs_obj_preparesolvermonitor->proc~monitor_set_set proc~respart_set_createmonitor ResPart_set%ResPart_set_CreateMonitor proc~cdifs_obj_preparesolvermonitor->proc~respart_set_createmonitor proc~grans_obj_monitor grans_obj_monitor proc~grans_obj_monitor->proc~monitor_set_set proc~grans_obj_monitor->proc~respart_set_updatemonitor proc~grans_obj_preparesolvermonitor grans_obj_PrepareSolverMonitor proc~grans_obj_preparesolvermonitor->proc~monitor_set_set proc~grans_obj_preparesolvermonitor->proc~respart_set_createmonitor proc~particle_set_createmonitor particle_set%particle_set_CreateMonitor proc~particle_set_createmonitor->proc~monitor_set_set proc~particle_set_updatemonitor particle_set%particle_set_UpdateMonitor proc~particle_set_updatemonitor->proc~monitor_set_set proc~respart_set_createmonitor->proc~monitor_set_set proc~respart_set_updatemonitor->proc~monitor_set_set interface~cdifs_obj_monitor cdifs_obj%cdifs_obj_Monitor interface~cdifs_obj_monitor->proc~cdifs_obj_monitor interface~grans_obj_monitor grans_obj%grans_obj_Monitor interface~grans_obj_monitor->proc~grans_obj_monitor proc~cdifs_obj_advancesolution cdifs_obj_AdvanceSolution proc~cdifs_obj_advancesolution->proc~cdifs_obj_advancesolutioncorrector proc~cdifs_obj_preparesolver cdifs_obj_PrepareSolver proc~cdifs_obj_preparesolver->proc~cdifs_obj_preparesolvermonitor proc~cdifs_obj_preparesolver->interface~cdifs_obj_monitor proc~grans_obj_preparesolver grans_obj_PrepareSolver proc~grans_obj_preparesolver->proc~grans_obj_preparesolvermonitor proc~grans_obj_preparesolver->interface~grans_obj_monitor interface~cdifs_obj_advancesolution cdifs_obj%cdifs_obj_AdvanceSolution interface~cdifs_obj_advancesolution->proc~cdifs_obj_advancesolution interface~cdifs_obj_preparesolver cdifs_obj%cdifs_obj_PrepareSolver interface~cdifs_obj_preparesolver->proc~cdifs_obj_preparesolver interface~grans_obj_preparesolver grans_obj%grans_obj_PrepareSolver interface~grans_obj_preparesolver->proc~grans_obj_preparesolver

Source Code

    impure function monitor_set_GetIndex(this,name) result(loc)
      !> Returns the ID of a monitor identified by name.
      implicit none
      class(monitor_set), intent(inout) :: this                                !! Set of monitor objects
      character(len=*),   intent(in)    :: name                                !! Name of the monitor
      integer :: loc                                                           !! Monitor ID

      call this%tbl%Get(key=this%tbl%HashString(name),val=loc)

      if (loc.eq.-1)  call this%parallel%Stop("Unable to find monitor: "//trim(adjustl(name)))

      return
    end function monitor_set_GetIndex