-record(shrinks, {step :: fun(() -> metamon@generator@tree:shrink_step(any()))}).