/* ch2tky2jgd.c (tky2jgd_c.c) */
/* 2004.8.30  urabe */
/* 2005.1.7  urabe */
/* 2005.1.20 urabe */
/* convert from WIN channel table to tky2jgd input file */
#include <stdio.h>
#include <math.h>
#include <stdlib.h>
main()
  {
  unsigned char ch[20],rec[20],delay[20],st[20],cmp[20],scl[20],unit[20],per[20],
    dmp[20],sensor[20],gain[20],tb[256],lat[20],lon[20],hei[20],scp[20],
    scs[20],name[20],*prefix,*star,cmp2[20],bits[20],resol[20];
  int i;
  double latit,longit,lat_min,lat_sec,lon_min,lon_sec;

  while(fgets(tb,256,stdin))
    {
    if(*tb==' ' || *tb=='#') continue;
    *lat=*lon=*hei=*scp=*scs=*name=0;
    sscanf(tb,"%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s",
      ch,rec,delay,st,cmp,scl,bits,sensor,unit,per,dmp,gain,resol,
      lat,lon,hei,scp,scs,name);
    if(*lon==0) continue;
    latit=atof(lat);
    longit=atof(lon);
/*    printf("%f %f\n",latit,longit);*/
    lat_min=60.0*(latit-(int)latit);
    lat_sec=60.0*(lat_min-(int)lat_min);
    lon_min=60.0*(longit-(int)longit);
    lon_sec=60.0*(lon_min-(int)lon_min);
    printf("%d%02d%07.4f %d%02d%07.4f %s %s %s %s\n",
      (int)latit,(int)lat_min,lat_sec,(int)longit,(int)lon_min,lon_sec,
      lat,lon,st,name);
    }
  }