FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Funciones trigonométricas
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Funciones trigonométricas
Posted: Tue Mar 25, 2008 02:12 PM

En las funciones "Undocumented CT Functions" del xHarbour estan, entre otras:
ACos()
ASin()
ATan()
Sin()
Cos()
...

Pues solo me funcionan cos y sin, las demas NO estan (Unresolved external)

¿ Alguien sabe donde estan ?

¿ Acaso son de ClipperTools ?

¿ Puedo linkar las ClipperTools con FWH 8.2 + x Harbour ?

Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
Posts: 731
Joined: Fri Oct 07, 2005 07:42 AM
Re: Funciones trigonométricas
Posted: Tue Mar 25, 2008 03:30 PM

Simplemente añade la libreria CTLIB de xHarbour, que es el equivalente a las CA-Tools.

Saludos

Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)
Posts: 563
Joined: Sun Oct 09, 2005 07:23 PM
Funciones trigonometricas
Posted: Tue Mar 25, 2008 03:34 PM

Las funciones que buscas son el arcocoseno, arcoseno y arco tangente.
Te aconsejo que las calcules utilizando el desarrollo de Taylor para cada función. Por ejemplo para el arcocoseno -acos(x)- es la siguiente:

acos(x)=pi/2 -x -(x^3)/6-(3x^5)/40-(5x^7)/112 ...
con x perteneciente al rango [-1, 1]

Normalmente con quedarte en el cuarto o quinto término de la serie ya vas a tener más precisión de la que es capaz de obtener cualquier aparato normal de medida. Todas las calculadoras científicas utilizan las series de Taylor.

Para la tangente ya sabes que es:
tg(x)=sin(x)/cos(x)

Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM
Funciones trigonométricas
Posted: Tue Mar 25, 2008 03:49 PM
Usa las funciones de C, para calculos trigonometricos. Yo las utilizo para calculo de rumbo y distancias.
//-----------------------FUNCIONES EN C para calculo trigonometrico ----------------------------
#pragma BEGINDUMP
#include "windows.h"
#include "math.h"
#include "hbapi.h"

HB_FUNC( TANG )
{
   hb_retnd((double) tan((double)hb_parnd(1) ));
}

HB_FUNC( ATN )
{
   hb_retnd((double) atan((double)hb_parnd(1)));
}
HB_FUNC( COS )
{
   hb_retnd((double) cos((double)hb_parnd(1)));
}
HB_FUNC( ACOS )
{
   hb_retnd((double) acos((double)hb_parnd(1)));
}
HB_FUNC( SIN )
{
   hb_retnd((double) sin((double)hb_parnd(1)));
}

#pragma ENDDUMP

No se si estan definidas todas las funciones que necesitas, pero es facil añdir las que quieras.
http://www.conclase.net/c/librerias/libreria.php?lib=math
Saludos desde Mallorca
Biel Maimó
http://bielsys.blogspot.com/
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Re: Funciones trigonométricas
Posted: Tue Mar 25, 2008 11:13 PM
thefull wrote:Simplemente añade la libreria CTLIB de xHarbour, que es el equivalente a las CA-Tools.
Pues, efectivamente, en el directorio ...\xHarbour\lib esta la CT.LIB
Si trae todas las funciones trigonométricas, pero sin embargo muchas de las funciones de ClipperTools no están.
Gracias.

Biel EA6DD wrote:Yo las utilizo para calculo de rumbo y distancias.
Para eso precisamente las quiero yo.
Gracias

Muchas gracias tambien a Verhoven.
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013

Continue the discussion