diff --git a/lib/decoder.f90 b/lib/decoder.f90
index 6049bb49e..e5a58859b 100644
--- a/lib/decoder.f90
+++ b/lib/decoder.f90
@@ -236,9 +236,10 @@ contains
     integer, intent(in) :: nsum
     integer, intent(in) :: minsync
 
-    integer i,nft
+    integer i,nft,nap(0:11)
     logical is_deep,is_average
     character decoded*22,csync*2,cflags*3
+    data nap/0,2,4,2,4,5,2,4,7,5,7,7/
 
     if(width.eq.-9999.0) stop              !Silence compiler warning
 !$omp critical(decode_results)
@@ -246,14 +247,14 @@ contains
     cflags='   '
     is_deep=ft.eq.2
 
-    if(ft.ge.80) then
+    if(ft.ge.80) then                      !QRA64 mode
        nft=ft-100
        csync=': '
        if(sync.ge.float(minsync) .or. nft.ge.0) csync=':*'
        if(nft.lt.0) then
           write(*,1009) params%nutc,snr,dt,freq,csync,decoded
        else
-          write(*,1009) params%nutc,snr,dt,freq,csync,decoded,nft
+          write(*,1009) params%nutc,snr,dt,freq,csync,decoded,nap(nft)
 1009      format(i4.4,i4,f5.1,i5,1x,a2,1x,a22,i2)
        endif
        write(13,1011) params%nutc,nint(sync),snr,dt,float(freq),drift,    &