class BB feature f alias "*" (i, j: INTEGER): INTEGER do Result := i + j end end