hash16-mul ( u v mul -- hash )


Vocabulary
checksums.cityhash.private

Inputs
uan object
van object
mulan object


Outputs
hashan object


Definition
USING: math math.bitwise ;

IN: checksums.cityhash.private

:: hash16-mul ( u v mul -- hash )
u v bitxor mul W* shift-mix v bitxor mul W* shift-mix mul W*
;