simulate i g = let ar = CUDA.run1 nextGen g
                in simulate (i - 1) ar
simulate i g = let ar = CUDA.run1 nextGen g
                in simulate (i - 1) ar
simulate i g = let ar = CUDA.run1 nextGen g
                in simulate (i - 1) ar