integer ii(16)                       !Locations of sync symbols
!  data ii/1,6,11,16,21,26,31,39,45,51,57,63,69,75,81,85/
  data ii/ 1,2,5,10,16,23,33,35,51,52,55,60,66,73,83,85/

  integer ii2(16)                     !Locations of sync half-symbols
!  data ii2/1,11,21,31,41,51,61,77,89,101,113,125,137,149,161,169/
  data ii2/1,3,9,19,31,45,65,69,101,103,109,119,131,145,165,169/


  integer isync(85)                    !Sync vector
!  data isync/                                    &
!       1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,  &
!       1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,0,0,0,1,0,  &
!       0,0,0,0,1,0,0,0,0,0,1,0,0,0,0,0,1,0,0,0,  &
!       0,0,1,0,0,0,0,0,1,0,0,0,0,0,1,0,0,0,0,0,  &
!       1,0,0,0,1/
  data isync/                                     &
       1,1,0,0,1,0,0,0,0,1,0,0,0,0,0,1,0,0,0,0,   &
       0,0,1,0,0,0,0,0,0,0,0,0,1,0,1,0,0,0,0,0,   &
       0,0,0,0,0,0,0,0,0,0,1,1,0,0,1,0,0,0,0,1,   &
       0,0,0,0,0,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0,   &
       0,0,1,0,1/