(let ((type arr (array int))
      (var max 10)
      (var nums (new-array arr max 0))
      (var i 0))
  (for (i 0 max) (:= (aref nums i) (* i 3))))