mirror of
https://github.com/pavel-demin/ft8d.git
synced 2025-09-06 07:07:49 -04:00
declare dd0 as complex in ft8b.f90
This commit is contained in:
parent
9f0998e376
commit
eac5bbb356
2
ft8b.f90
2
ft8b.f90
@ -17,7 +17,7 @@ subroutine ft8b(dd0,newdat,nQSOProgress,nfqso,nftx,ndepth,lapon,lapcqonly, &
|
|||||||
real ps(0:7),psl(0:7)
|
real ps(0:7),psl(0:7)
|
||||||
real bmeta(3*ND),bmetb(3*ND),bmetap(3*ND)
|
real bmeta(3*ND),bmetb(3*ND),bmetap(3*ND)
|
||||||
real llr(3*ND),llra(3*ND),llr0(3*ND),llr1(3*ND),llrap(3*ND) !Soft symbols
|
real llr(3*ND),llra(3*ND),llr0(3*ND),llr1(3*ND),llrap(3*ND) !Soft symbols
|
||||||
real dd0(NMAX)
|
complex dd0(NMAX)
|
||||||
integer*1 decoded(KK),decoded0(KK),apmask(3*ND),cw(3*ND)
|
integer*1 decoded(KK),decoded0(KK),apmask(3*ND),cw(3*ND)
|
||||||
integer*1 msgbits(KK)
|
integer*1 msgbits(KK)
|
||||||
integer apsym(KK)
|
integer apsym(KK)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user