mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-22 04:11:16 -05:00
Remove a diagnostic print from display.f90.
This commit is contained in:
parent
84e07c346a
commit
bada2dd822
@ -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
|
||||||
|
Loading…
Reference in New Issue
Block a user