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 proc~setupcasebcs SetUpCaseBCS proc~setupcasebcs->proc~bc_set_add proc~setupcasebcs->proc~bc_set_setbc proc~setupcasebcs~11 SetUpCaseBCS proc~setupcasebcs~11->proc~bc_set_add proc~setupcasebcs~11->proc~bc_set_setbc proc~setupcasebcs~13 SetUpCaseBCS proc~setupcasebcs~13->proc~bc_set_add proc~setupcasebcs~13->proc~bc_set_setbc proc~setupcasebcs~14 SetUpCaseBCS proc~setupcasebcs~14->proc~bc_set_add proc~setupcasebcs~14->proc~bc_set_setbc proc~setupcasebcs~2 SetUpCaseBCS proc~setupcasebcs~2->proc~bc_set_add proc~setupcasebcs~2->proc~bc_set_setbc proc~setupcasebcs~3 SetUpCaseBCS proc~setupcasebcs~3->proc~bc_set_add proc~setupcasebcs~3->proc~bc_set_setbc proc~setupcasebcs~4 SetUpCaseBCS proc~setupcasebcs~4->proc~bc_set_add proc~setupcasebcs~4->proc~bc_set_setbc proc~setupcasebcs~5 SetUpCaseBCS proc~setupcasebcs~5->proc~bc_set_add proc~setupcasebcs~5->proc~bc_set_setbc proc~setupcasebcs~9 SetUpCaseBCS proc~setupcasebcs~9->proc~bc_set_add proc~setupcasebcs~9->proc~bc_set_setbc proc~setupcasefields SetUpCaseFields proc~setupcasefields->proc~eulerian_set_add proc~setupcasefields~10 SetUpCaseFields proc~setupcasefields~10->proc~eulerian_set_add proc~setupcasefields~2 SetUpCaseFields proc~setupcasefields~2->proc~eulerian_set_add proc~setupcasefields~3 SetUpCaseFields proc~setupcasefields~3->proc~eulerian_set_add proc~setupcasefields~4 SetUpCaseFields proc~setupcasefields~4->proc~eulerian_set_add proc~setupcasefields~5 SetUpCaseFields proc~setupcasefields~5->proc~eulerian_set_add proc~setupcasefields~6 SetUpCaseFields proc~setupcasefields~6->proc~eulerian_set_add proc~setupcasefields~7 SetUpCaseFields proc~setupcasefields~7->proc~eulerian_set_add proc~setupcasefields~8 SetUpCaseFields proc~setupcasefields~8->proc~eulerian_set_add proc~setupcasefields~9 SetUpCaseFields proc~setupcasefields~9->proc~eulerian_set_add 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 program~main main program~main->proc~setupcasebcs program~main->proc~setupcasefields program~main~10 main program~main~10->proc~setupcasefields~6 program~main~11 main program~main~11->proc~setupcasebcs~11 program~main~11->proc~setupcasefields~7 program~main~12 main program~main~12->proc~setupcasefields~8 program~main~13 main program~main~13->proc~setupcasebcs~13 program~main~13->proc~setupcasefields~9 program~main~14 main program~main~14->proc~setupcasebcs~14 program~main~14->proc~setupcasefields~10 program~main~2 main program~main~2->proc~setupcasebcs~2 program~main~3 main program~main~3->proc~setupcasebcs~3 program~main~3->proc~setupcasefields~2 program~main~4 main program~main~4->proc~setupcasebcs~4 program~main~5 main program~main~5->proc~setupcasebcs~5 program~main~5->proc~setupcasefields~3 program~main~8 main program~main~8->proc~setupcasefields~4 program~main~9 main program~main~9->proc~setupcasebcs~9 program~main~9->proc~setupcasefields~5 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