/*
 * include needed system headers
 */
#include <stdio.h>       /* include standard i/o library */
#include <stdlib.h>      /* include standard library */
#include <string.h>      /* include string library */
#include <unistd.h>      /* include unix standard library */
#include <sys/types.h>   /* */
#include <sys/stat.h>    /* */
#include <fcntl.h>       /* */
#include <errno.h>       /* error simbol definitions */
#include <time.h>        /* system time definitions */
#include <math.h>        /* math library */

void skipbyte_(int *fd)

{
    int nhead;

    nhead = 13;

/*** goes back 13 words, then half 16 bit word ahead ***/

    lseek(*fd, -2*nhead, SEEK_CUR); //SEEK_CUR ---> from current position

    lseek(*fd, 1, SEEK_CUR);

}