Remove an unused variable from fst4_decode

2026-06-16 04:38:43 -04:00 · 2020-08-28 12:25:17 -05:00
parent e232c32178
commit 8159478d51
1 changed files with 0 additions and 1 deletions
@@ -57,7 +57,6 @@ contains
      integer itone(NN)
      integer hmod
      integer*1 apmask(240),cw(240)
-      integer*1 hbits(320)
      integer*1 message101(101),message74(74),message77(77)
      integer*1 rvec(77)
      integer apbits(240)