package openGL.Screen -- -- Models an openGL screen. -- is type Item is tagged limited private; private type Item is tagged limited record null; end record; end openGL.Screen;