(dotimes(i 401)(format t"~D "(+(nth(mod i 3)`(1 2,i))i)))