%begin
  %integerarray fred(0:10)
  %integer i
  i = fred(5)
%endofprogram