From cff1de14a37082919e884c59298b9bce07d1c670 Mon Sep 17 00:00:00 2001
From: Bill Somerville <g4wjs@classdesign.com>
Date: Mon, 29 Aug 2016 17:02:23 +0000
Subject: [PATCH] Fix a typo that cause grid vectors on the same longtitude
 parallels to fail

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7045 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
---
 lib/azdist.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/azdist.f90 b/lib/azdist.f90
index dd2c51a86..2e21b5172 100644
--- a/lib/azdist.f90
+++ b/lib/azdist.f90
@@ -53,7 +53,7 @@ subroutine azdist(grid1,grid2,utch,nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter)
   call grid2deg(MyGrid,dlong1,dlat1)
   call grid2deg(HisGrid,dlong2,dlat2)
   eps=1.e-6
-  if(abs(dlat1-dlat2).lt.eps .and. abs(dling1-dling2).lt.eps) then
+  if(abs(dlat1-dlat2).lt.eps .and. abs(dlong1-dlong2).lt.eps) then
      Az=0.
      Dmiles=0.
      Dkm=0.0