PROC Main()
  CARD i

  i=0
  DO
    PrintF("%U ",i)
    i==+1
  UNTIL i=0
  OD
RETURN