let main =
  do {
    while (!x >? 0) {
      x := !x - 1
    }
  } until (True)