In ft8apset, mycall and dxcall must be at least 3 characters long, otherwise they are treated as non-existent.

2026-06-12 10:48:37 -04:00 · 2018-12-24 11:19:07 -06:00
parent b44d7b472d
commit 1a8ddad307
1 changed files with 1 additions and 1 deletions
@@ -14,7 +14,7 @@ subroutine ft8apset(mycall12,hiscall12,apsym)

  nohiscall=.false. 
  hiscall=hiscall12 
-  if(len(trim(hiscall)).eq.0) then
+  if(len(trim(hiscall)).lt.3) then
     hiscall=mycall12  ! use mycall for dummy hiscall - mycall won't be hashed.
     nohiscall=.true.
  endif