package Geometry.IO is ------------------------------------------------------------------ --| Child Package: Input/Output for Geometric Figures --| Author: Michael B. Feldman, The George Washington University --| Last Modified: September 1995 ------------------------------------------------------------------ procedure Get (Item : out Geometry.Figure); -- Pre : None -- Post: Item contains a geometric figure. procedure Put (Item : in Geometry.Figure); -- Pre : Item is defined. -- Post: Item is displayed. end Geometry.IO;