ar = ARRAY("3,2")      ;* 3 rows, 2 columns
fill  i = LT(i, 3) i + 1     :F(display)
      ar<i,1> = i
      ar<i,2> = i "-count"   :(fill)

display                      ;* fail on end of array
      j = j + 1
      OUTPUT = "Row " ar<j,1> ": " ar<j,2>
+                            :S(display)
END