Remove an unused variable from fst4_decode

2026-07-30 05:54:22 -04:00 · 2020-08-28 12:25:17 -05:00
parent 5ca81a6507
commit f066936043
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)