summaryrefslogtreecommitdiff
path: root/src/lib/math/hypot.go
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/math/hypot.go')
-rw-r--r--src/lib/math/hypot.go16
1 files changed, 5 insertions, 11 deletions
diff --git a/src/lib/math/hypot.go b/src/lib/math/hypot.go
index d1afac9e3..6295c124a 100644
--- a/src/lib/math/hypot.go
+++ b/src/lib/math/hypot.go
@@ -12,11 +12,7 @@ package math
* Vol. 27, Number 6, pp. 577-581, Nov. 1983
*/
-export func
-hypot(p, q float64) float64
-{
- var r, s, pfac float64;
-
+export func Hypot(p, q float64) float64 {
if p < 0 {
p = -p;
}
@@ -25,22 +21,20 @@ hypot(p, q float64) float64
}
if p < q {
- r = p;
- p = q;
- q = r;
+ p, q = q, p;
}
if p == 0 {
return 0;
}
- pfac = p;
+ pfac := p;
q = q/p;
- r = q;
+ r := q;
p = 1;
for {
r = r*r;
- s = r+4;
+ s := r+4;
if s == 4 {
return p*pfac;
}