comicsansg/ft8d
1
0
Fork 0
mirror of https://github.com/pavel-demin/ft8d.git synced 2025-04-04 18:48:34 -04:00
Code Issues Packages Projects Releases Wiki Activity

set npass to 5 if ndepth is 3 in ft8d.f90

Browse Source
This commit is contained in:
Pavel Demin 2020-06-25 13:42:20 +00:00
parent 81352f19cf
commit b1d35b7fa6
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ft8d.f90
View File

@ -46,7 +46,8 @@ program ft8d
lft8apon=.false.
ndepth=1
if(ndepth.eq.1) npass=1
if(ndepth.ge.2) npass=3
if(ndepth.eq.2) npass=3
if(ndepth.ge.3) npass=5
do ipass=1,npass
newdat=.true.
syncmin=1.5