Anonymous

/* Lee desde teclado los campos latitud y longitud de la estructura coordenada 
y retorna una estructura de tipo tCoordenada cargada con éstos valores */
tCoordenada leer_coordenada_teclado ()
{
tCoordenada coord;

	coord = ini_coordenada();

	printf("\n                Latitud? ");
	scanf("%f%*c", &coord.latitud);
	printf("\n                Longitud? ");
	scanf("%f%*c", &coord.longitud);

	return coord;
}

void escribir_coordenada_pantalla (tCoordenada coord)
{
	printf("\n Coordenada: latitud=%.2f  longitud=%.2f \n", coord.latitud, coord.longitud);
}

void posicionar_tortuga (tCoordenada coordenada)
{
	posicion_inicial (coordenada.latitud,coordenada.longitud);
}

void  dibujar_segmento ( tCoordenada cinicio, tCoordenada cfinal )
{
	float x,z;
	
	x=atan(cfinal.longitud/cinicio.latitud);
	girar(x);
	z=calcular_distancia(cinicio,cfinal);
	avanzar(z);

	

}

float calcular_distancia (tCoordenada coord1, tCoordenada coord2)
{
	float x,y,z;
		x=(coord2.latitud)-(coord1.latitud);
	    y=(coord2.longitud)-(coord1.longitud);
        z=sqrt(pow(x,2)+pow(y,2));

	return z;
}

int escribir_coordenada_fichero(FILE *fp, tCoordenada coordenada)
{
	return 0;
}

int leer_coordenada_fichero(FILE *fp, tCoordenada *coordenada)
{
	return 0;
}

tCoordenada rotar_coordenada (tCoordenada origen, float angulo, tCoordenada centro_rotacion)
{
	tCoordenada coordenada;
	coordenada = ini_coordenada();
	return coordenada;
}

int coordenadas_iguales ( tCoordenada coordA,tCoordenada coordB)
{
	return (coordA.latitud==coordB.latitud) && (coordA.longitud==coordB.longitud);
}

float angulo_segmento_abcisas ( tCoordenada cinicio , tCoordenada cfinal )
{
double x,y,alpha;

	x= cfinal.longitud - cinicio.longitud;
	y= cfinal.latitud  - cinicio.latitud;

	if ( x>=0  && y>=0  )
	{
		alpha	=	atan(y/x)*180/PI;
	}
	else if ( x>=0 && y<0 )
	{
		y=-y;
		alpha	=	360 - atan(y/x)*180/PI;
	}
	else if ( x<0 && y>=0 )
	{
		x=-x;
		alpha	=	180- atan(y/x)*180/PI;
	}
	else if ( x<0 && y<0)
	{
		x=-x;
		y=-y;
		alpha	=	180 + atan(y/x)*180/PI;
	}

	return (float) alpha;
}