hashtbl_obj_Put Subroutine

private pure subroutine hashtbl_obj_Put(this, key, val)

Type Bound

hashtbl_obj

Arguments

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

Hashtable object
integer, intent(in) :: key

Key from key-val pair to add in hashtable
class(*), intent(in) :: val

Val from key-val pair to add in hashtable

Calls

proc~~hashtbl_obj_put~~CallsGraph proc~hashtbl_obj_put hashtbl_obj%hashtbl_obj_Put proc~sllist_obj_put sllist_obj%sllist_obj_Put proc~hashtbl_obj_put->proc~sllist_obj_put proc~sllist_obj_put->proc~sllist_obj_put

Called by

proc~~hashtbl_obj_put~~CalledByGraph proc~hashtbl_obj_put hashtbl_obj%hashtbl_obj_Put proc~bc_set_add bc_set%bc_set_Add proc~bc_set_add->proc~hashtbl_obj_put proc~eulerian_set_add eulerian_set%eulerian_set_Add proc~eulerian_set_add->proc~hashtbl_obj_put proc~hdf5_obj_creategroup hdf5_obj%hdf5_obj_CreateGroup proc~hdf5_obj_creategroup->proc~hashtbl_obj_put proc~hdf5_obj_opengroup hdf5_obj%hdf5_obj_OpenGroup proc~hdf5_obj_opengroup->proc~hashtbl_obj_put proc~monitor_set_create monitor_set%monitor_set_Create proc~monitor_set_create->proc~hashtbl_obj_put proc~region_obj_add region_obj%region_obj_Add proc~region_obj_add->proc~hashtbl_obj_put proc~timer_obj_addtiming timer_obj%timer_obj_AddTiming proc~timer_obj_addtiming->proc~hashtbl_obj_put proc~bc_set_read bc_set%bc_set_Read proc~bc_set_read->proc~bc_set_add none~readattributes hdf5_obj%ReadAttributes proc~bc_set_read->none~readattributes proc~bc_set_setbc bc_set%bc_set_SetBC proc~bc_set_setbc->proc~region_obj_add proc~bc_set_write bc_set%bc_set_Write proc~bc_set_write->proc~hdf5_obj_creategroup none~writeattributes hdf5_obj%WriteAttributes proc~bc_set_write->none~writeattributes proc~cdifs_obj_preparesolverfields cdifs_obj_PrepareSolverFields proc~cdifs_obj_preparesolverfields->proc~eulerian_set_add proc~cdifs_obj_preparesolvermonitor cdifs_obj_PrepareSolverMonitor proc~cdifs_obj_preparesolvermonitor->proc~monitor_set_create proc~cdifs_obj_preparesolvermonitor->proc~timer_obj_addtiming proc~respart_set_createmonitor ResPart_set%ResPart_set_CreateMonitor proc~cdifs_obj_preparesolvermonitor->proc~respart_set_createmonitor proc~grans_obj_preparesolverfields grans_obj_PrepareSolverFields proc~grans_obj_preparesolverfields->proc~eulerian_set_add proc~grans_obj_preparesolvermonitor grans_obj_PrepareSolverMonitor proc~grans_obj_preparesolvermonitor->proc~monitor_set_create proc~grans_obj_preparesolvermonitor->proc~timer_obj_addtiming proc~grans_obj_preparesolvermonitor->proc~respart_set_createmonitor proc~h5hut_obj_setstep h5hut_obj%h5hut_obj_SetStep proc~h5hut_obj_setstep->proc~hdf5_obj_creategroup proc~h5hut_obj_write3d h5hut_obj%h5hut_obj_Write3D proc~h5hut_obj_write3d->proc~hdf5_obj_creategroup proc~h5hut_obj_writegrid h5hut_obj%h5hut_obj_WriteGrid proc~h5hut_obj_writegrid->proc~hdf5_obj_creategroup proc~h5hut_obj_writegrid->none~writeattributes proc~hdf5_obj_getnpoints hdf5_obj%hdf5_obj_GetNPoints proc~hdf5_obj_getnpoints->proc~hdf5_obj_opengroup proc~hdf5_obj_read1d hdf5_obj%hdf5_obj_Read1D proc~hdf5_obj_read1d->proc~hdf5_obj_opengroup proc~hdf5_obj_read3d hdf5_obj%hdf5_obj_Read3D proc~hdf5_obj_read3d->proc~hdf5_obj_opengroup proc~hdf5_obj_readattributes0d hdf5_obj%hdf5_obj_ReadAttributes0D proc~hdf5_obj_readattributes0d->proc~hdf5_obj_opengroup proc~hdf5_obj_readattributes1d hdf5_obj%hdf5_obj_ReadAttributes1D proc~hdf5_obj_readattributes1d->proc~hdf5_obj_opengroup proc~hdf5_obj_readcoord hdf5_obj%hdf5_obj_ReadCoord proc~hdf5_obj_readcoord->proc~hdf5_obj_opengroup proc~hdf5_obj_write1d hdf5_obj%hdf5_obj_Write1D proc~hdf5_obj_write1d->proc~hdf5_obj_opengroup proc~hdf5_obj_write3d hdf5_obj%hdf5_obj_Write3D proc~hdf5_obj_write3d->proc~hdf5_obj_opengroup proc~hdf5_obj_writeattributes0d hdf5_obj%hdf5_obj_WriteAttributes0D proc~hdf5_obj_writeattributes0d->proc~hdf5_obj_opengroup proc~hdf5_obj_writeattributes1d hdf5_obj%hdf5_obj_WriteAttributes1D proc~hdf5_obj_writeattributes1d->proc~hdf5_obj_opengroup proc~hdf5_obj_writecoord hdf5_obj%hdf5_obj_WriteCoord proc~hdf5_obj_writecoord->proc~hdf5_obj_opengroup proc~particle_set_createmonitor particle_set%particle_set_CreateMonitor proc~particle_set_createmonitor->proc~monitor_set_create proc~respart_set_createmonitor->proc~monitor_set_create none~readattributes->proc~hdf5_obj_readattributes0d none~readattributes->proc~hdf5_obj_readattributes1d none~writeattributes->proc~hdf5_obj_writeattributes0d none~writeattributes->proc~hdf5_obj_writeattributes1d proc~block_obj_read block_obj%block_obj_Read proc~block_obj_read->proc~hdf5_obj_readcoord proc~block_obj_read->none~readattributes proc~block_obj_write block_obj%block_obj_Write proc~block_obj_write->proc~hdf5_obj_writecoord proc~block_obj_write->none~writeattributes proc~cdifs_obj_preparesolver cdifs_obj_PrepareSolver proc~cdifs_obj_preparesolver->proc~cdifs_obj_preparesolverfields proc~cdifs_obj_preparesolver->proc~cdifs_obj_preparesolvermonitor proc~cdifs_obj_preparesolverbcs cdifs_obj_PrepareSolverBCS proc~cdifs_obj_preparesolver->proc~cdifs_obj_preparesolverbcs proc~cdifs_obj_preparesolverbcs->proc~bc_set_setbc proc~eulerian_set_writesingleh5hut eulerian_set%eulerian_set_WriteSingleH5HUT proc~eulerian_set_writesingleh5hut->proc~h5hut_obj_writegrid proc~grans_obj_preparesolver grans_obj_PrepareSolver proc~grans_obj_preparesolver->proc~grans_obj_preparesolverfields proc~grans_obj_preparesolver->proc~grans_obj_preparesolvermonitor proc~grans_obj_preparesolverbcs grans_obj_PrepareSolverBCS proc~grans_obj_preparesolver->proc~grans_obj_preparesolverbcs proc~grans_obj_preparesolverbcs->proc~bc_set_setbc proc~h5hut_obj_getnpoints h5hut_obj%h5hut_obj_GetNPoints proc~h5hut_obj_getnpoints->proc~hdf5_obj_getnpoints proc~h5hut_obj_jumptostep h5hut_obj%h5hut_obj_JumpToStep proc~h5hut_obj_jumptostep->proc~h5hut_obj_setstep proc~h5hut_obj_jumptostep->none~readattributes proc~h5hut_obj_lasttimestep h5hut_obj%h5hut_obj_LastTimeStep proc~h5hut_obj_lasttimestep->proc~h5hut_obj_setstep proc~h5hut_obj_lasttimestep->none~readattributes proc~h5hut_obj_newtimestep h5hut_obj%h5hut_obj_NewTimeStep proc~h5hut_obj_newtimestep->proc~h5hut_obj_setstep proc~h5hut_obj_newtimestep->none~writeattributes proc~h5hut_obj_readattributes0d h5hut_obj%h5hut_obj_ReadAttributes0D proc~h5hut_obj_readattributes0d->proc~h5hut_obj_setstep proc~h5hut_obj_readattributes0d->none~readattributes proc~h5hut_obj_readattributes1d h5hut_obj%h5hut_obj_ReadAttributes1D proc~h5hut_obj_readattributes1d->proc~h5hut_obj_setstep proc~h5hut_obj_readattributes1d->none~readattributes proc~h5hut_obj_writeattributes0d h5hut_obj%h5hut_obj_WriteAttributes0D proc~h5hut_obj_writeattributes0d->proc~h5hut_obj_setstep proc~h5hut_obj_writeattributes0d->none~writeattributes proc~h5hut_obj_writeattributes1d h5hut_obj%h5hut_obj_WriteAttributes1D proc~h5hut_obj_writeattributes1d->proc~h5hut_obj_setstep proc~h5hut_obj_writeattributes1d->none~writeattributes 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 none~readattributes~2 h5hut_obj%ReadAttributes none~readattributes~2->proc~h5hut_obj_readattributes0d none~readattributes~2->proc~h5hut_obj_readattributes1d none~writeattributes~2 h5hut_obj%WriteAttributes none~writeattributes~2->proc~h5hut_obj_writeattributes0d none~writeattributes~2->proc~h5hut_obj_writeattributes1d none~writesingle eulerian_set%WriteSingle none~writesingle->proc~eulerian_set_writesingleh5hut proc~eulerian_set_readh5hut eulerian_set%eulerian_set_ReadH5HUT proc~eulerian_set_readh5hut->proc~h5hut_obj_jumptostep proc~eulerian_set_readh5hut->proc~h5hut_obj_lasttimestep proc~eulerian_set_readhdf5 eulerian_set%eulerian_set_ReadHDF5 proc~eulerian_set_readhdf5->none~readattributes proc~eulerian_set_writeh5hut eulerian_set%eulerian_set_WriteH5HUT proc~eulerian_set_writeh5hut->proc~h5hut_obj_newtimestep proc~eulerian_set_writeh5hut->none~writesingle proc~eulerian_set_writehdf5 eulerian_set%eulerian_set_WriteHDF5 proc~eulerian_set_writehdf5->none~writeattributes proc~eulerian_set_writehdf5->none~writesingle proc~marker_set_readh5hut marker_set%marker_set_ReadH5HUT proc~marker_set_readh5hut->proc~h5hut_obj_getnpoints proc~marker_set_readh5hut->proc~h5hut_obj_jumptostep proc~marker_set_readh5hut->proc~h5hut_obj_lasttimestep proc~marker_set_readhdf5 marker_set%marker_set_ReadHDF5 proc~marker_set_readhdf5->none~readattributes proc~marker_set_writeh5hut marker_set%marker_set_WriteH5HUT proc~marker_set_writeh5hut->proc~h5hut_obj_newtimestep proc~marker_set_writehdf5 marker_set%marker_set_WriteHDF5 proc~marker_set_writehdf5->none~writeattributes proc~particle_set_readh5hut particle_set%particle_set_ReadH5HUT proc~particle_set_readh5hut->proc~h5hut_obj_getnpoints proc~particle_set_readh5hut->proc~h5hut_obj_jumptostep proc~particle_set_readh5hut->proc~h5hut_obj_lasttimestep proc~particle_set_readhdf5 particle_set%particle_set_ReadHDF5 proc~particle_set_readhdf5->none~readattributes proc~particle_set_writeh5hut particle_set%particle_set_WriteH5HUT proc~particle_set_writeh5hut->proc~h5hut_obj_newtimestep proc~particle_set_writehdf5 particle_set%particle_set_WriteHDF5 proc~particle_set_writehdf5->none~writeattributes proc~respart_set_readh5hut ResPart_set%ResPart_set_ReadH5HUT proc~respart_set_readh5hut->proc~h5hut_obj_getnpoints proc~respart_set_readh5hut->proc~h5hut_obj_jumptostep proc~respart_set_readh5hut->proc~h5hut_obj_lasttimestep proc~respart_set_readhdf5 ResPart_set%ResPart_set_ReadHDF5 proc~respart_set_readhdf5->none~readattributes proc~respart_set_readhdf5->proc~marker_set_readhdf5 proc~respart_set_writeh5hut ResPart_set%ResPart_set_WriteH5HUT proc~respart_set_writeh5hut->proc~h5hut_obj_newtimestep proc~respart_set_writeh5hut->proc~marker_set_writeh5hut proc~respart_set_writehdf5 ResPart_set%ResPart_set_WriteHDF5 proc~respart_set_writehdf5->none~writeattributes proc~respart_set_writehdf5->proc~marker_set_writehdf5 proc~solid_set_readhdf5 solid_set%solid_set_ReadHDF5 proc~solid_set_readhdf5->none~readattributes proc~solid_set_readhdf5->proc~marker_set_readhdf5 proc~solid_set_writehdf5 solid_set%solid_set_WriteHDF5 proc~solid_set_writehdf5->none~writeattributes proc~solid_set_writehdf5->proc~marker_set_writehdf5 proc~eulerian_set_writesilo eulerian_set%eulerian_set_WriteSILO proc~eulerian_set_writesilo->none~writesingle proc~solid_set_readh5hut solid_set%solid_set_ReadH5HUT proc~solid_set_readh5hut->none~readattributes~2 proc~solid_set_writeh5hut solid_set%solid_set_WriteH5HUT proc~solid_set_writeh5hut->none~writeattributes~2

Source Code

    pure subroutine hashtbl_obj_Put(this,key,val)
      ! Adds a key-val pair to a hashtable
      implicit none
      class(hashtbl_obj), intent(inout) :: this                                !! Hashtable object
      integer,            intent(in)    :: key                                 !! Key from key-val pair to add in hashtable
      class(*),           intent(in)    :: val                                 !! Val from key-val pair to add in hashtable
      ! Work variable
      integer :: hash

      hash = mod(key,this%vec_len) + 1
      call this%vec(hash)%Put(key=key,val=val)

      return
    end subroutine hashtbl_obj_Put