#include <stdio.h>

main()
{   double latd, latf, lond, lonf, tlat, tlon, talt, wlat, wlon, walt;
    fprintf(stderr, "\nTOKYO to WGS84 Lat/Lon/Alt Conversion\n\n");
    while (1) {
        latd = 99999.; latf = 0.; lond = 0.; lonf = 0.; talt = 0.;
        prompt("  Latitude ?  (deg. min.)\n");
        gparmd2("   < Hit RETURN to Quit > ==> ", &latd,&latf);
        if (latd == 99999.) { fputc('\n',stderr); break; }
        gparmd2("  Longitude ? (deg. min.) ==> ", &lond,&lonf);
        gparmd("  Altitude ?  (in meters) ==> ", &talt);
        tlat = latd*60.+latf; tlon = lond*60.+lonf;
        latd = (int)(tlat/60.); latf = tlat - latd*60.;
        lond = (int)(tlon/60.); lonf = tlon - lond*60.;
        printf("  TOKYO   %3.0f:%6.3f\'N   %4.0f:%6.3f\'E   %6.1f m\n",
                latd,latf,lond,lonf,talt);
        xtw84(tlat, tlon, talt, &wlat, &wlon, &walt);
        latd = (int)(wlat/60.); latf = wlat-latd*60.;
        lond = (int)(wlon/60.); lonf = wlon-lond*60.;
        printf("  WGS84   %3.0f:%6.3f\'N   %4.0f:%6.3f\'E   %6.1f m\n\n",
                latd,latf,lond,lonf,walt);
    }
}