CALL SEQUENCE...
       sqroot  XIN XOUT OUTPUT [-NA]
 
 
      AUTHOR  - S.CROZIER, JUL 26/82.
      LAST REVISION: $Header: /home/cvs/RMNLIB/utils/rdiag/lspgm/sqroot.ptn,v 4.18 2014/09/25 20:20:54 dugas Exp $
 
  
      PURPOSE - CALCULATE THE SQUARE ROOT OF ANY KIND OF NUMERICAL 
                INPUT FIELD, COMPLEX OR REAL.
 
      NOTE    - THE SQUARE ROOT OF ZERO IS LEFT AS ZERO 
  
 
      INPUT FILE... 
       XIN  = FILE OF FIELDS TO BE RAISED TO THE POWER 1/2 
  
      OUTPUT FILE... 
       XOUT = FILE CONTAINING THE SQUARE ROOT OF XIN 
 
 
      NOTE THAT MISSING VALUE TREATMENT IS SUPPORTED VIA EITHER
      THE "MISSING_VALUE" ENVIRONMENT VARIABLE OR THE "-mvalue"
      COMMAND-LINE ARGUMENT. PLEASE SEE THE R.DIAG WEB
      DOCUMENTAION FOR MORE DETAILS.
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
        2 REAL NEGATIVE DATA AND "-NA" NOT SPECIFIED
        3 UNABLE TO READ FILE XIN