begin
  integer data
  integername pointer
  integermap mapresult
    owninteger data2
    result == data2
  end

  integermap test(integer n)
     result == data if n = 1
     result == pointer if n = 2
     result == mapresult
  end

  integer q

  q = test(4)
  
endofprogram