def count_go
import bend-collections@1.0.0.0/src/containers/bitset.bend as Bitsetimport Base
266def count_go(m: Nat, p: Array<Wd> & Nat, +d: Nat, +q: Nat) -> Array<Wd> & Nat:
267 match m:
268 case 0n:
269 p
270 case 1n+r:
271 (a, acc) = p
272 count_go(r, count_add(read(a, d, q), acc), d, 1n+q)