mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-09-26 23:26:36 -04:00
Optimize the Q65 inner loops. Also more code cleanup.
This commit is contained in:
parent
fa92799bda
commit
1b541082fd
@ -102,8 +102,8 @@ subroutine qra_params(ndepth,maxaptype,idf0max,idt0max,ibwmin,ibwmax,maxdist)
|
|||||||
|
|
||||||
integer iparam(7)
|
integer iparam(7)
|
||||||
logical first,ex
|
logical first,ex
|
||||||
! data iparam/3,5,3,11,0,9,30/ !Maximum effort
|
! data iparam/3,5,11,11,0,11,60/ !Maximum effort
|
||||||
data iparam/2,5,3,11,3,9,10/ !Default values
|
data iparam/3,5,7,7,0,4,15/ !Default values
|
||||||
data first/.true./
|
data first/.true./
|
||||||
save first,iparam
|
save first,iparam
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user