begin

  integer x, i

  integername in
  integerarray ira(0:9)
  integernamearray ina(0:9)
  integernamearrayname inan
  integermap im(integer i); result == i; end
  integermap im2(integer i); result == in; end
  integermap im3(integer i); result == ira(i); end
  integermap im4(integer i); result == ina(i); end
  integermap im5(integer i); result == inan(i); end
  in == i
  x = i
  x = in
  x = ira(i)
  in == ira(i)
  x = ira(i)
  ira(i) = i
  in == ina(i)
  x = ina(i)
  ina(x) = i
  inan == ina
  in == inan(i)
  inan(i) = x
  x = inan(i)
  in == im(i)
  x = im(i)
  im(i) = x
endofprogram