(bind-func world_set_to_checkerboard (lambda (w) (doloop (i (world_height w)) (doloop (j (world_width w)) (cell_set_value w i j (convert (% (+ i j) 2)))))))