mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-25 21:58:38 -05:00
Make jt9 work with the 41/47/50 scheme.
This commit is contained in:
parent
83d87e9654
commit
b130479249
11
lib/jt9.f90
11
lib/jt9.f90
@ -310,7 +310,18 @@ program jt9
|
||||
id2a(nearly*3456+1:)=0
|
||||
call multimode_decoder(shared_data%ss,id2a, &
|
||||
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
|
||||
call multimode_decoder(shared_data%ss,id2a, &
|
||||
shared_data%params,nfsample)
|
||||
cycle
|
||||
endif
|
||||
! Normal decoding pass
|
||||
call multimode_decoder(shared_data%ss,shared_data%id2, &
|
||||
|
Loading…
Reference in New Issue
Block a user