From 33b50da632a270c70bedfe62e72bfc8bcc0ed436 Mon Sep 17 00:00:00 2001
From: Joe Taylor <k1jt@arrl.org>
Date: Tue, 24 Nov 2015 20:16:57 +0000
Subject: [PATCH] Remove vestiges of LU 22 for kvasd.dat.

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

diff --git a/lib/demod64a.f90 b/lib/demod64a.f90
index 1ea5c4c20..e7521d8ab 100644
--- a/lib/demod64a.f90
+++ b/lib/demod64a.f90
@@ -46,8 +46,6 @@ subroutine demod64a(s3,nadd,afac1,mrsym,mrprob,mr2sym,mr2prob,ntest,nlow)
            i2=i                              !Second most reliable
         endif
      enddo
-!     p1=fs(i1)/fsum           !Normalized probabilities for kvasd
-!     p2=fs(i2)/fsum
      p1=s1/psum                !Use these for sfrsd
      p2=s2/psum                !
      mrsym(j)=i1-1