w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-22 12:23:37 -05:00
Code Issues Packages Projects Releases Wiki Activity

Make jt9 work with the 41/47/50 scheme.

Browse Source
This commit is contained in:
Steven Franke 2020-03-06 19:03:09 -06:00
parent 83d87e9654
commit b130479249
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lib/jt9.f90
View File

@ -310,7 +310,18 @@ program jt9
id2a(nearly*3456+1:)=0 id2a(nearly*3456+1:)=0
call multimode_decoder(shared_data%ss,id2a, & call multimode_decoder(shared_data%ss,id2a, &
shared_data%params,nfsample) shared_data%params,nfsample)
nearly=47
shared_data%params%nzhsym=nearly
id2a(1:nearly*3456)=shared_data%id2(1:nearly*3456)
id2a(nearly*3456+1:)=0
call multimode_decoder(shared_data%ss,id2a, &
shared_data%params,nfsample)
id2a(nearly*3456+1:50*3456)=shared_data%id2(nearly*3456+1:50*3456)
id2a(50*3456+1:)=0
shared_data%params%nzhsym=50 shared_data%params%nzhsym=50
call multimode_decoder(shared_data%ss,id2a, &
shared_data%params,nfsample)
cycle
endif endif
! Normal decoding pass ! Normal decoding pass
call multimode_decoder(shared_data%ss,shared_data%id2, & call multimode_decoder(shared_data%ss,shared_data%id2, &