cs_zapad
Messages postés70Date d'inscriptionmercredi 30 avril 2003StatutMembreDernière intervention 7 juillet 2009
-
26 juin 2003 à 21:11
CHOURAN
Messages postés8Date d'inscriptionvendredi 30 décembre 2005StatutMembreDernière intervention 9 mars 2013
-
19 févr. 2012 à 23:53
bonsoir
je me met a un pgm de calcul d'orbites satellite.;
coment faire des arc-tangentes (ATN (y -en-radians))
ca doiit bien exister - mais ^pas trouvé
@ +
CHOURAN
Messages postés8Date d'inscriptionvendredi 30 décembre 2005StatutMembreDernière intervention 9 mars 2013 19 févr. 2012 à 23:53
Function ACos(ByVal number As Double) As Double
If Abs(number) <> 1 Then
ACos = 1.5707963267949 - Atn(number / Sqr(1 - number * number))
ElseIf number = -1 Then
ACos = 3.14159265358979
End If
End Function