------------------------------------------------------------------
--
--  NAME: SQUARE_ROOT
--  DISCREPANCY REPORTS:
--
------------------------------------------------------------------
-- file:  square_root.ada
-- level: all levels

package SQUARE_ROOT is

   function SQRT
      (VALUE : float)
   return float;

end SQUARE_ROOT;