class Camera
  string cbuf
  method TakePhoto()
  end method
  method ViewPhoto()
  end method
end class

class MobilePhone
  string pbuf
  method MakeCall()
  end method
  method TakeCall()
  end method
end class

class CameraPhone
  has Camera,MobilePhone
end class

CameraPhone cp

cp.ViewPhoto
cp.MakeCall