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

Remove obsolete comments.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6640 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Steven Franke 2016-04-24 01:24:32 +00:00
parent f5af6525f5
commit e68674214c
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lib/ldpcsim.f90
View File

@ -1,13 +1,12 @@
program ldpcsim program ldpcsim
! simulate with packed 72-bit messages and 8-bit hash - so only makes
! sense to use this with codes having K=80.
use, intrinsic :: iso_c_binding use, intrinsic :: iso_c_binding
use hashing use hashing
use packjt use packjt
! To change to a new code, edit the following line and the filenames
! that contain the parity check and generator matrices.
! parameter (N=128, K=80) ! M and N are global variables on the C side.
character*22 msg,msgsent character*22 msg,msgsent
integer*4 i4Msg6BitWords(12) integer*4 i4Msg6BitWords(12)
integer*1, target:: i1Msg8BitBytes(10) ! 72 bit msg + 8 bit hash integer*1, target:: i1Msg8BitBytes(10) ! 72 bit msg + 8 bit hash