:: (a -> b) -> [a] -> [b] -package:stm-hamt -package:deepseq package:adjunctions