BEGIN {
    L = 1.18;
    n = 50;
    pi = 4*atan2(1,1);
    i = 1;
    while ( (getline < "rholonlat") > 0 ) {
	time[i] = $1;
	rho[i]  = $2;
	lon[i]  = $3;
	lat[i]  = $4;
	printf("%6.3f, \n", 0.8*time[i]/n) > "keys";
	printf("%6.3f 0 %6.3f %6.3f, \n", \
		cos(lon[i]), -sin(lon[i]), pi/2 - lat[i]) \
		> "rotorValues";
	printf("0 %6.3f 0, \n", rho[i]/L) > "extenderValues";

	i++;
    }
    printf("%6.3f, \n", 0.9) > "keys";
    printf("%6.3f, \n", 1.0) > "keys";

    printf("%6.3f 0 %6.3f %6.3f, \n", cos(lon[n]), -sin(lon[n]), pi/2 - lat[n])\
		> "rotorValues";
    printf("%6.3f 0 %6.3f %6.3f, \n", cos(lon[1]), -sin(lon[1]), pi/2 - lat[1])\
		> "rotorValues";

    printf("0 %6.3f 0, \n", rho[n]/L) > "extenderValues";
    printf("0 %6.3f 0, \n", rho[1]/L) > "extenderValues";
}