mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-14 08:01:49 -05:00
Minor tweaks aimed at better fer65 results.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6551 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
e798285479
commit
66cf899388
@ -145,7 +145,6 @@ program fer65
|
|||||||
else if(decoded.ne.' ') then
|
else if(decoded.ne.' ') then
|
||||||
nbad=nbad+1
|
nbad=nbad+1
|
||||||
print*,'Nbad:',nbad,decoded
|
print*,'Nbad:',nbad,decoded
|
||||||
stop
|
|
||||||
endif
|
endif
|
||||||
endif
|
endif
|
||||||
20 continue
|
20 continue
|
||||||
@ -192,7 +191,7 @@ program fer65
|
|||||||
xdt,edt,dfreq,efreq,xsum,esum,xwidth,ewidth
|
xdt,edt,dfreq,efreq,xsum,esum,xwidth,ewidth
|
||||||
1100 format(f5.1,2i6i4,2f6.1,f6.1,f5.1,f6.2,f5.2,6f5.1)
|
1100 format(f5.1,2i6i4,2f6.1,f6.1,f5.1,f6.2,f5.2,6f5.1)
|
||||||
flush(20)
|
flush(20)
|
||||||
if(ngood.eq.iters) exit
|
if(ngood.ge.int(0.99*iters)) exit
|
||||||
enddo
|
enddo
|
||||||
|
|
||||||
999 end program fer65
|
999 end program fer65
|
||||||
|
@ -188,7 +188,7 @@ contains
|
|||||||
naggressive,ndepth,mycall,hiscall,hisgrid,nexp_decode, &
|
naggressive,ndepth,mycall,hiscall,hisgrid,nexp_decode, &
|
||||||
sync2,a,dtx,nft,qual,nhist,nsmo,decoded)
|
sync2,a,dtx,nft,qual,nhist,nsmo,decoded)
|
||||||
call timer('decod65a',1)
|
call timer('decod65a',1)
|
||||||
if(nft.eq.1) nsum=1
|
if(nft.ne.0) nsum=1
|
||||||
|
|
||||||
! ncandidates=param(0)
|
! ncandidates=param(0)
|
||||||
nhard_min=param(1)
|
nhard_min=param(1)
|
||||||
|
@ -544,6 +544,9 @@
|
|||||||
<height>16777215</height>
|
<height>16777215</height>
|
||||||
</size>
|
</size>
|
||||||
</property>
|
</property>
|
||||||
|
<property name="alignment">
|
||||||
|
<set>Qt::AlignCenter</set>
|
||||||
|
</property>
|
||||||
<property name="suffix">
|
<property name="suffix">
|
||||||
<string> %</string>
|
<string> %</string>
|
||||||
</property>
|
</property>
|
||||||
|
Loading…
Reference in New Issue
Block a user