int count;
t_calcephbin *peph;

/* open the ephemeris file */
peph = calceph_open("example1.dat");
if (peph)
{
  /* print the number of position's record */
  count = calceph_getpositionrecordcount(peph);
  printf("number of position's record : %d\n", count);

  /* close the ephemeris file */
  calceph_close(peph);
}