Trivial code cleanup.

This commit is contained in:
Joe Taylor 2020-03-28 14:05:48 -04:00
parent 3f7b06853e
commit 33ce9e3355

View File

@ -59,8 +59,6 @@ subroutine wqencode(msg,ntype,data0)
n2=128*ih + ntype + 64
call pack50(n1,n2,data0)
endif
go to 900
900 continue
return
end subroutine wqencode