diff --git a/lib/fst4_decode.f90 b/lib/fst4_decode.f90
index d32873c42..88572dfb7 100644
--- a/lib/fst4_decode.f90
+++ b/lib/fst4_decode.f90
@@ -459,9 +459,9 @@ contains
                   llr=llra
                   if(nblock.gt.1) then
                      if(hmod.eq.1) llr=llrc
-                     if(hmod.eq.2) llr=llrb
-                     if(hmod.eq.4) llr=llrc
-                     if(hmod.eq.8) llr=llrd
+                     if(hmod.eq.2) llr=llra
+                     if(hmod.eq.4) llr=llrb
+                     if(hmod.eq.8) llr=llrc
                   endif
                   iaptype=naptypes(nQSOProgress,itry-nblock)
                   if(lapcqonly) iaptype=1