Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #28  
Antiguo 04-02-2020
compuin compuin is offline
Miembro
 
Registrado: oct 2010
Posts: 230
Poder: 16
compuin Va por buen camino
Smile

Cita:
Empezado por escafandra Ver Mensaje
Ves, mal interpretado. El seno de un angulo no puede ser mayor de 1 en valor absoluto. Los datos dados deben ser ángulos y no las tangentes. Ten en cuenta las unidades de los ángulos, pues si te los dan en radianes no tendrás que convertir. Las funciones trigonométricas de delphi funcionan en radianes.


Sigo viendo falta de rigor matemático en los ejemplos que tienes. Te paso la función:
Código Delphi [-]
function DiferenciaAscensional(lt, decl: Extended): Extended;
begin
  Result:= RadToDeg(arcsin(tan(DegToRad(lt)) * tan(DegToRad(decl))));
end;


Y para el caso en el que te den ya las tangentes:
Código Delphi [-]
function DiferenciaAscensional2(lt, decl: Extended): Extended;
begin
  Result:= RadToDeg(arcsin(lt * decl));
end;




Saludos.
Gracias, para mi todo esto es nuevo

La idea es hacer los calculos a partir de los valores de la Longitud y la latitud. Estos valores vienen ya calculados como valores decimales por una libreria externa. Lo demas de trigonometria y calculo sobre los angulos lo debo hacer yo a mano.

Pude entender lo que me dices con respecto a angulos y tangentes. En realidad los valores deberian manejarse siempre en valores decimales

Entonces la segunda funcion es la que deberia servir para esto, la voy a probar y te comento
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Conversion Grados a Radianes y retorno compuin OOP 41 05-02-2020 23:07:41
Radianes a Grados torito Varios 4 05-05-2010 01:48:46
Operaciones entre bases de datos subzero MS SQL Server 3 17-01-2008 21:55:57
operaciones entre fechas Torreblanca Varios 4 09-07-2005 20:20:27
Convertir decimales a radianes Picard C++ Builder 6 05-06-2004 11:43:47


La franja horaria es GMT +2. Ahora son las 22:50:43.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi