185a186
> FIX_TYPE pos0, pos1;  /* interpolated positions */
253c254
<    FIX_TYPE pos0, pos1;  /* interpolated positions */
---
>    extern FIX_TYPE pos0, pos1;  /* interpolated positions */
548a550
> VELOCITY_TYPE ship_l, ship_r;
557c559
<    VELOCITY_TYPE ship_l, ship_r;
---
>    extern VELOCITY_TYPE ship_l, ship_r;
800a803,804
>    extern VELOCITY_TYPE ship_l, ship_r;
>    extern FIX_TYPE pos0, pos1;
841c845
<    fprintf(fp_out,"u/d     time #abs #fix  deltaU deltaV variance    vmin shift     amp   phase\n");
---
>    fprintf(fp_out,"u/d     time #abs #fix  deltaU deltaV variance    vmin shift     amp   phase ship_l (u & v)  ship_r (u & v)  lat  lon\n");
910,911c914,917
<                    fprintf(fp_out, "  %4.0lf %7.3lf %7.3lf\n",
<                       xmin*SECONDS_PER_DAY, amp, phase);
---
>                    fprintf(fp_out, "  %4.0lf %7.3lf %7.3lf %6.2lf %6.2lf %6.2lf %6.2lf %6.2lf %6.2lf\n",
>                       xmin*SECONDS_PER_DAY, amp, phase,
>                       ship_l.u, ship_l.v, ship_r.u, ship_r.v,
>                       0.5 * (pos0.y + pos1.y), 0.5 * (pos0.x + pos1.x));
