diff --git a/lib/fst4/fst4sim.f90 b/lib/fst4/fst4sim.f90
index 453c1fe97..936c4b6f4 100644
--- a/lib/fst4/fst4sim.f90
+++ b/lib/fst4/fst4sim.f90
@@ -94,9 +94,9 @@ program fst4sim
       write(*,*) '         mycall                         hiscall                    hisgrid'
       write(*,'(28i1,1x,i1,1x,28i1,1x,i1,1x,i1,1x,15i1,1x,3i1)') msgbits(1:77)
    elseif(i3.eq.0 .and. n3.eq.6) then
-      write(*,*) '50-bit message'
-      write(*,'(a50)') '01234567890123456789012345678901234567890123456789'
+      write(*,'(a15,37x,a5)') '50-bit message','CRC24'
       write(*,'(50i1,1x,24i1)') msgbits(1:50),msgbits(51:74)
+      write(*,'(a50)') '01234567890123456789012345678901234567890123456789'
    else
       write(*,'(a14)') 'Message bits: '
       write(*,'(77i1,1x,24i1)') msgbits