int j;
double jd0=2442457;
double dt1=0.5E0;
t_calcephbin *peph;
double PV[6];

/* open the ephemeris file */
peph = calceph_open("example1.dat");
if (peph)
{
  calceph_prefetch(peph);

  calceph_orient_unit(peph, jd0, dt1, NAIFID_MOON,
                       CALCEPH_USE_NAIFID+CALCEPH_UNIT_RAD
                       +CALCEPH_UNIT_SEC,
                       PV);
  for(j=0; j<6; j++) printf("%23.16E\n", PV[j]);

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