maths et VB

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é
@ +

les atan c'est atn en vb

c'st dans ta question ??
Les angles sont en radians

z = atn(y)

-------------------------------
Réponse au message :
-------------------------------

> 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é
> @ +
>

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


incorrecect