let cave0 = [|[|FLOOR;FLOOR;FLOOR;FLOOR|]; [|FLOOR;WALL;WALL;FLOOR|]; [|FLOOR;WALL;WALL;FLOOR|]; [|FLOOR;FLOOR;FLOOR;FLOOR|]|]