begin
  integermap mapresult
    owninteger ownvar
    result == ownvar
  end

  integer scalar

  scalar = mapresult

endofprogram