PQ Formel UDF funktioniert nicht :(

Hallo,

bei mir funktioniert die UDF:

[autoit]

$PQ = _Mathe_PQ(0.002, 3)

[/autoit][autoit][/autoit][autoit]

MsgBox(0, "", $PQ[0] & @CRLF & $PQ[1])

[/autoit][autoit][/autoit][autoit]

Func _Mathe_PQ($P, $Q)
Dim $Result[2]

[/autoit][autoit][/autoit][autoit]

$Result[0] = (-$P / 2) + Sqrt((-$P / 2) ^ 2 - $Q)
$Result[1] = (-$P / 2) - Sqrt((-$P / 2) ^ 2 - $Q)

Return $Result
EndFunc ;==>_Mathe_PQ

[/autoit]

Nicht. Weiß jemand woran das liegen könnte?

Joa jetzt weiß ich woran das lag...man kann keine Wuzel aus negativen Zahlen ziehen

Edit: Zu langsam gewesen