#include	<stdio.h>
float x[3000], y[3000];
struct { float lat, lon; } xy[3000];
main(ac,av)
int ac; char **av;
   {
	int npts, i;
	char card[82];

	while( (npts=next(x,y)) )
	   {
		write(1,&npts,4);
		for(i=0; i<npts; i++)
		   {
			xy[i].lat= x[i];
			xy[i].lon= y[i];
		   }
		write(1,xy,8*npts);
	   }
   }

next(x,y)
float *x, *y;
   {
	int npts, n, i;
	char card[82], buf[16], *ptr;
	double atof();
	float xbase, ybase;
	float val;
	float j;
	int iflag, ntot, first;

	ntot= 0;
	first= 1;
loop:
	if( fscanf(stdin,"%d %d",&npts,&iflag) != 2) return(0);
	fprintf(stderr,"npts=%d iflag=%d\n",npts,iflag);
	if(!first)
	   {
		fscanf(stdin,"%f %f",&j,&j);
		npts--;
	   }
	for(i=ntot; i<ntot+npts; i++)
		fscanf(stdin,"%f %f",&x[i],&y[i]);
	ntot += npts;
	first= 0;
	if(iflag) goto loop;
	return(ntot);
   }
strcopy(s1,s2,n)
char *s1, *s2;
int n;
   {
	while(n--) *s1++ = *s2++;
	*s1= '\0';
   }