Updated to r8541

2018-03-05 14:49:51 -05:00
parent a4fa5b9988
commit a32fe6a4dc
200 changed files with 20394 additions and 4957 deletions
@@ -100,7 +100,7 @@ subroutine genmsk144(msg0,mygrid,ichk,bcontest,msgsent,i4tone,itype)

     ihash=nhash(c_loc(i1Msg8BitBytes),int(9,c_size_t),146)
     ihash=2*iand(ihash,32767)                   !Generate the 8-bit hash
-     i1Msg8BitBytes(10)=i1hash(1)                !CRC to byte 10
+     i1Msg8BitBytes(10)=i1hash(1)                !Hash code to byte 10

     mbit=0
     do i=1, 10