在 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.
的答案
我正在尝试在我的 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.
的答案