begin
  ownshortintegerarray  p(0:255) = 42, 24, 99(252), 16_ab, 16_cd
  ownshortintegerarray  q(-128:127) = 42, 24, 99(252), 16_ab, 16_cd
  ownshortintegerarray  r(1000:1255) = 42, 24, 99(*)
  integer i
  i = p(100)
  i = q(-28)
  i = r(1100)
endofprogram