From 10893da6fd157d333222ba7ba38bd1865738bb68 Mon Sep 17 00:00:00 2001
From: Russ Cox <rsc@golang.org>
Date: Wed, 19 Nov 2008 16:14:31 -0800
Subject: gotestify & gostylify math.

R=r
DELTA=682  (275 added, 301 deleted, 106 changed)
OCL=19638
CL=19642
---
 src/lib/math/atan.go | 31 ++++++++++---------------------
 1 file changed, 10 insertions(+), 21 deletions(-)

(limited to 'src/lib/math/atan.go')

diff --git a/src/lib/math/atan.go b/src/lib/math/atan.go
index aa4c29234..43990fe40 100644
--- a/src/lib/math/atan.go
+++ b/src/lib/math/atan.go
@@ -13,7 +13,6 @@ package math
  *	coefficients are #5077 from Hart & Cheney. (19.56D)
  */
 
-
 const
 (
 	p4	= .161536412982230228262e2;
@@ -36,13 +35,9 @@ const
  *	xatan evaluates a series valid in the
  *	range [-0.414...,+0.414...]. (tan(pi/8))
  */
-func
-xatan(arg float64) float64
-{
-	var argsq, value float64;
-
-	argsq = arg*arg;
-	value = ((((p4*argsq + p3)*argsq + p2)*argsq + p1)*argsq + p0);
+func Xatan(arg float64) float64 {
+	argsq := arg*arg;
+	value := ((((p4*argsq + p3)*argsq + p2)*argsq + p1)*argsq + p0);
 	value = value/(((((argsq + q4)*argsq + q3)*argsq + q2)*argsq + q1)*argsq + q0);
 	return value*arg;
 }
@@ -51,29 +46,23 @@ xatan(arg float64) float64
  *	satan reduces its argument (known to be positive)
  *	to the range [0,0.414...] and calls xatan.
  */
-func
-satan(arg float64) float64
-{
-
+func Satan(arg float64) float64 {
 	if arg < sq2m1 {
-		return xatan(arg);
+		return Xatan(arg);
 	}
 	if arg > sq2p1 {
-		return pio2 - xatan(1/arg);
+		return pio2 - Xatan(1/arg);
 	}
-	return pio4 + xatan((arg-1)/(arg+1));
+	return pio4 + Xatan((arg-1)/(arg+1));
 }
 
 /*
  *	atan makes its argument positive and
  *	calls the inner routine satan.
  */
-export func
-atan(arg float64) float64
-{
-
+export func Atan(arg float64) float64 {
 	if arg > 0 {
-		return satan(arg);
+		return Satan(arg);
 	}
-	return -satan(-arg);
+	return -Satan(-arg);
 }
-- 
cgit v1.2.3