tomwalters@0: /*
tomwalters@0:   stof.c        binary short-to-float conversion.
tomwalters@0:  --------
tomwalters@0: 
tomwalters@0: */
tomwalters@0: 
tomwalters@0: #include <stdio.h>
tomwalters@0: #include <math.h>
tomwalters@0: #include "options.h"
tomwalters@0: 
tomwalters@0: char applic[]     = "short to float data-type conversion." ;
tomwalters@0: 
tomwalters@0: static char *helpstr ;
tomwalters@0: 
tomwalters@0: static Options option[] = {
tomwalters@0:     {   "help"      ,   "off"       ,  &helpstr     ,   "help"          ,  DEBUG     },
tomwalters@0:    ( char * ) 0 } ;
tomwalters@0: 
tomwalters@0: 
tomwalters@0: main(argc, argv)
tomwalters@0: int   argc ;
tomwalters@0: char *argv[] ;
tomwalters@0: {
tomwalters@0:     FILE  *fp ;
tomwalters@0:     short  X;
tomwalters@0:     float  Y;
tomwalters@0: 
tomwalters@0:     fp = openopts( option,argc,argv ) ;
tomwalters@0:     if ( !isoff( helpstr ) )
tomwalters@0: 	helpopts( helpstr, argv[0], applic, option ) ;
tomwalters@0: 
tomwalters@0:     while ( fread( &X, sizeof(short), 1, fp ) ) {
tomwalters@0: 	Y = (float)X ;
tomwalters@0: 	fwrite( &Y, sizeof(float), 1, stdout);
tomwalters@0:     }
tomwalters@0: 
tomwalters@0:     fclose(fp);
tomwalters@0:     exit(0);
tomwalters@0: }
tomwalters@0: 
tomwalters@0: