w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-24 10:22:26 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fix bpdecode174_74.f90 to work with revised crc24 routine.

Browse Source
This commit is contained in:
Steven Franke 2020-04-17 15:06:22 -05:00
parent c2d60afcf9
commit 041d0bf1f4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/fsk4hf/bpdecode174_74.f90
View File

@ -55,7 +55,7 @@ subroutine bpdecode174_74(llr,apmask,maxiterations,message50,cw,nharderror,iter)
enddo enddo
if( ncheck .eq. 0 ) then ! we have a codeword - if crc is good, return it if( ncheck .eq. 0 ) then ! we have a codeword - if crc is good, return it
decoded=cw(1:74) decoded=cw(1:74)
call get_crc24(decoded,nbadcrc) call get_crc24(decoded,74,nbadcrc)
nharderror=count( (2*cw-1)*llr .lt. 0.0 ) nharderror=count( (2*cw-1)*llr .lt. 0.0 )
if(nbadcrc.eq.0) then if(nbadcrc.eq.0) then
message50=decoded(1:50) message50=decoded(1:50)