Remove a diagnostic print from display.f90.

This commit is contained in:
Joe Taylor 2021-07-05 15:25:25 -04:00
parent 84e07c346a
commit bada2dd822

View File

@ -128,7 +128,6 @@ subroutine display(nkeep,ftol)
line3(k)(23:27)//line3(k)(35:38)//line3(k)(46:70)// & line3(k)(23:27)//line3(k)(35:38)//line3(k)(46:70)// &
line3(k)(73:77) line3(k)(73:77)
if(livecq(56:56).eq.':') livecq(56:58)=' '//livecq(56:57) if(livecq(56:56).eq.':') livecq(56:58)=' '//livecq(56:57)
print*,'= ',trim(livecq)
if(index(livecq,' CQ ').gt.0 .or. index(livecq,' QRZ ').gt.0 .or. & if(index(livecq,' CQ ').gt.0 .or. index(livecq,' QRZ ').gt.0 .or. &
index(livecq,' QRT ').gt.0 .or. index(livecq,' CQV ').gt.0 .or. & index(livecq,' QRT ').gt.0 .or. index(livecq,' CQV ').gt.0 .or. &
index(livecq,' CQH ').gt.0) write(19,1029) livecq index(livecq,' CQH ').gt.0) write(19,1029) livecq