summaryrefslogtreecommitdiff
path: root/src/lib/math/sin.go
blob: b6a074242ea891d5c483bda590eea16824eab0c9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
// Copyright 2009 The Go Authors. All rights reserved.
// Use of this source code is governed by a BSD-style
// license that can be found in the LICENSE file.

package math

import "math"

func sinus(arg float64, quad int) float64 {
	// Coefficients are #3370 from Hart & Cheney (18.80D).
	const
	(
		P0	=  .1357884097877375669092680e8;
		P1	= -.4942908100902844161158627e7;
		P2	=  .4401030535375266501944918e6;
		P3	= -.1384727249982452873054457e5;
		P4	=  .1459688406665768722226959e3;
		Q0	=  .8644558652922534429915149e7;
		Q1	=  .4081792252343299749395779e6;
		Q2	=  .9463096101538208180571257e4;
		Q3	=  .1326534908786136358911494e3;
	)
	x := arg;
	if(x < 0) {
		x = -x;
		quad = quad+2;
	}
	x = x * (2/Pi);	/* underflow? */
	var y float64;
	if x > 32764 {
		var e float64;
		e, y = sys.Modf(x);
		e = e + float64(quad);
		temp1, f := sys.Modf(0.25*e);
		quad = int(e - 4*f);
	} else {
		k := int32(x);
		y = x - float64(k);
		quad = (quad + int(k)) & 3;
	}

	if quad&1 != 0 {
		y = 1-y;
	}
	if quad > 1 {
		y = -y;
	}

	yy := y*y;
	temp1 := ((((P4*yy+P3)*yy+P2)*yy+P1)*yy+P0)*y;
	temp2 := ((((yy+Q3)*yy+Q2)*yy+Q1)*yy+Q0);
	return temp1/temp2;
}

export func Cos(arg float64) float64 {
	if arg < 0 {
		arg = -arg;
	}
	return sinus(arg, 1);
}

export func Sin(arg float64) float64 {
	return sinus(arg, 0);
}