ArcSin

ArcSin

Messagepar Stephane Maillard » 19 Juil 2005 à 19:54

[syntax="ls"]Function ArcSin(x As Double) As Double
If x = 1 Then
ArcSin = Pi / 2
ElseIf x = -1 Then
ArcSin = -Pi / 2
Else
ArcSin = Atn(x / Sqr(-x * x + 1))
End If
End Function[/syntax]
Cordialement

Stéphane Maillard
Avatar de l’utilisateur
Stephane Maillard
Lord of DominoArea
Lord of DominoArea
 
Message(s) : 8695
Inscrit(e) le : 16 Déc 2004 à 01:10
Localisation : Bretagne

Retour vers Divers