#include <stdio.h>
#include <math.h>                          // each model has 2 err, err2 ignore
FILE   *fp;
char f1[50];
struct { int i1,i2; double ra,dc; short ugriz[25]; } u;

main(int ac, char **av)
{
  int    i,j,k;
  float x,y;
  double w,v;
  if(ac<2){ printf("\n\t**** test s00b *****\n"); exit(0); }
  sprintf(f1,"/UCAC3/%s",av[1]);
  fp=fopen(f1,"rb"); if(fp==0){ printf("file not found!\n"); exit(0); }
l10:
  for(i=0;i<1000;i++){  fread(&u,1,74,fp);   if(feof(fp))goto l20; }
  x=u.ra; y=u.dc; w=(u.ra-x)*3600; v=(u.dc-y)*3600;
  printf("%lf %lf  %lf %lf\n",u.ra,u.dc,w,v);
  goto l10;
l20:
  fclose(fp);
}
