Function:     HMS

Purpose:      Convert degrees to a string containing the hours, 
              minutes and seconds.

File:         hms.c

Category:     COORDINATES

Author:       Fred Lahuis

Use:          CALL HMS(  DEGREES,        Input      double
                         STRING,         Output     char*(*)
                         COOR,           Output     double array (n = 3)
                         PRECISION       Input      integer
                         OUTPUT)         Input      integer

              DEGREES     Input value in degrees
              STRING      Output string, format xxh~xxm~xx.xxs
                          or xxhxx'xx".
              COOR        Array of size 3 to receive the hours,
                          minutes and seconds.
                          Omitted if the array is equal to NULL.
              PRECISION   Indicates the precision in which the
                          seconds are printed.
              OUTPUT      Type of output
                            0 --> with h m s
                            1 --> with h ' ", for use with pgplot

Updates:      Jul 15, 1991: FL, Creation date.
              Feb 12, 1992: MV, New calculation of minuts to avoid
                                rounding errors.
              Oct 19, 1992: FL, Output string changed for 0s.
              Nov 13, 1992: FL, Proper handling of 60s, 60m and 24h.
              Sep 17, 1993: FL, Error in length convstr.