incrSize :: Gen t -> Gen t
incrSize gen = sized (\size -> resize (size + 1) gen)
incrSize :: Gen t -> Gen t
incrSize gen = sized (\size -> resize (size + 1) gen)
incrSize gen = sized (\size -> resize (size + 1) gen)