在 Fortran 中为哈希码中的键赋值

assign value to key in hash code in Fortran

我正在尝试在我的 Fortran 代码中实现散列 table,我在 Internet 上找到了一个示例,但我无法弄清楚如何将值分配给键。

以下 link 重定向到我要实现的 Fortran 模块,并提供有关如何使用代码的示例。

http://didgeridoo.une.edu.au/womwiki/doku.php?id=fortran:fortran

有人能解释一下如何为这个示例程序中的键赋值吗?

该页面上的 example program 显示了如何使用它:

 call hash_it(idorig, 1, idnew, ipos, .false.)

! call hash_it(idorig, ivar, idnew, ipos, noadd)
!    idorig = ID to be recoded
!    ivar   = list no. (1, 2, ..., mlists)
!    idnew  = new ID
!    ipos   = position in hash table (rarely used)
!    noadd  = option: .false. adds new IDs
!                     .true.  does not add new IDs, just looks up position

idorig 是要存储的(整数)值,idnew 是(整数)键。然后您可以在 hlist.

中查找 idnew

此实现只能存储整数,并使用值的散列作为键,即您不能自己指定键。如果这不符合您的需要,您可能还想查看 this question, or on the Fortran wiki.

的答案