SUBROUTINE DISTXY ( IDISTANCE, NDISTANCE, TLAT, TLON, RLAT_DIST, RLON_DIST, NPSL, RLATD, RLONGD )

Argument Definitions (+ indicates altered content)
INTEGER            IDISTANCE,  NDISTANCE,  NPSL
REAL              +RLATD,      RLAT_DIST, +RLONGD,     RLON_DIST
REAL               TLAT,       TLON
Source file:distxy.f
Intrinsic Functions Called
REAL               FLOAT
External Functions and Subroutines Called
SUBROUTINE         DAZEL
Referenced Common Block Variables (+ indicates altered content)
AZEL               REAL              +ZDGC,     +ZRLAT
AZEL               REAL              +ZRLON,    +ZTLAT
AZEL               REAL              +ZTLON
CON                REAL               R2D