SUBROUTINE DEG2CHR ( DEGS, LATLON, CHAR )

Argument Definitions (+ indicates altered content)
CHARACTER*(*)     +CHAR
INTEGER            LATLON
REAL               DEGS
Description
SUB DEG2CHR(DEGS,LATLON,CHAR)   Degrees to CHARACTER (xxxNxx'xx") 
       Convert degrees to characters for output. 
       DEGS = input degrees (may be -180 to 180  or  0 to 360) 
       LATLON=0= latitude   format xxxNxx'xx" 
             =1= longitude  format xxxExx'xx" 
             =2= latitude   format  xx.xxN 
             =3= longitude  format xxx.xxE 
       CHAR  = CHARACTER*10 output
Source file:deg2chr.f
Intrinsic Functions Called
GENERIC            ABS,        MOD
Local Variables (+ indicates altered content)
CHARACTER         +NSEW
INTEGER           +IDEG,      +ISEC,      +MIN,       +MODD
REAL              +D,         +DEG