    SQRT(III)                    3/15/72                    SQRT(III)

    NAME
         sqrt - square root function

    SYNOPSIS
         jsr  pc,sqrt

         double sqrt(x)
         double x;

    DESCRIPTION
         The square root of fr0 (resp. x) is returned (in fr0).

    DIAGNOSTICS
         The  c-bit  is  set on negative arguments and 0 is returned.
         There is no error return for C programs.

    BUGS
         No error return from C.

                                  - 1 -