def adler.of
import bend-kit-hash@0.3.0.2/hash.bend as Hashimport Base
429# Adler-32 (RFC 1950 §9). The state is the checksum itself: s2 << 16 | s1.
430# A word takes mod 65521 once, after four bytes; no sum reaches 2^32 first.
431def adler.of(+s1: U32, +s2: U32) -> U32:
432 (((s2 % 65521) << 16n) .|. (s1 % 65521) : U32)