for r,row in ipairs(level) do

  for _,row in ipairs(level) do

    for c,pair in ipairs(row) do

    for _,pair in ipairs(row) do

function draw_level_state()

function player_state(level_state)

        player = {x=c, y=r}
      end

        return {x=c, y=r}
      end end end end
function draw_level_state()
  for r,row in ipairs(level_state) do
    for c,cell in ipairs(row) do

  player.y = player.y+1

  player.y = player.y-1

  player.x = player.x-1

  player.x = player.x+1

  player = player_state(level_state)

  player = player_state(level_state)

  player = player_state(level_state)