027ddc9c5e03643aa7c3da001085cff472d0550c28a818707ce1821dddb18882

Download raw

Created: 2023-12-19 03:40:10.302489 UTC

Size: 718

Preview (limited to 512 bytes)

"/*\n * These hash functions were developed by Thomas Wang.\n *\n * http://www.concentric.net/~ttwang/tech/inthash.htm\n */\n\n#include <stdint.h>\n\nuint32_t hashable_wang_32(uint32_t a)\n{\n a = (a ^ 61) ^ (a >> 16);\n a = a + (a << 3);\n a = a ^ (a >> 4);\n a = a * 0x27d4eb2d;\n a = a ^ (a >> 15);\n return a;\n}\n\nuint64_t hashable_wang_64(uint64_t key)\n{\n key = (~key) + (key << 21); // key = (key << 21) - key - 1;\n key = key ^ ((key >> 24) | (key << 40));\n key = (key + (key << 3)) + (key << 8);"

Casa is a service provided by the Haskell Foundation │ Originally developed by FP Complete