very small piece of haskell https://git.e-x-a.org/exa/uskel/atom?h=gc-attempt-1