-- (C) Copyright 1999 by John Halleck -- All Rights Reserved. -- Output library of some of the basic types. package Survey.Text_IO is procedure Put (Point : in Location); procedure Put (Variance : in Covariance); procedure Put (Weights : in Weight); end Survey.Text_IO;