Initial Commit

2018-02-08 21:28:33 -05:00
commit 678c1d3966
14352 changed files with 3176737 additions and 0 deletions
@@ -0,0 +1,10 @@
+module hashing
+  interface
+     integer(c_int32_t) function nhash (key, length, initval) bind(C, name="nhash")
+       use iso_c_binding, only: c_ptr, c_size_t, c_int32_t
+       type(c_ptr), intent(in), value :: key
+       integer(c_size_t), intent(in), value :: length
+       integer(c_int32_t), intent(in), value :: initval
+     end function nhash
+  end interface
+end module hashing