blob: 4f34e123ef47054078459fe4f7a83647f2815737 [file] [log] [blame]
Charles L. Dorian7f11db52010-01-15 13:21:36 -08001// Copyright 2010 The Go Authors. All rights reserved.
2// Use of this source code is governed by a BSD-style
3// license that can be found in the LICENSE file.
4
Rob Pike8bca1482014-08-12 17:04:45 -07005#include "textflag.h"
Keith Randall1f796632013-08-12 10:25:18 -07006
Charles L. Dorian7f11db52010-01-15 13:21:36 -08007// func Asin(x float64) float64
Keith Randall1f796632013-08-12 10:25:18 -07008TEXT ·Asin(SB),NOSPLIT,$0
Charles L. Dorian7f11db52010-01-15 13:21:36 -08009 FMOVD x+0(FP), F0 // F0=sin(x)
10 FMOVD F0, F1 // F0=sin(x), F1=sin(x)
11 FMULD F0, F0 // F0=sin(x)*sin(x), F1=sin(x)
12 FLD1 // F0=1, F1=sin(x)*sin(x), F2=sin(x)
13 FSUBRDP F0, F1 // F0=1-sin(x)*sin(x) (=cos(x)*cos(x)), F1=sin(x)
14 FSQRT // F0=cos(x), F1=sin(x)
15 FPATAN // F0=arcsin(sin(x))=x
Russ Cox07720b62013-03-22 12:57:55 -040016 FMOVDP F0, ret+8(FP)
Charles L. Dorian7f11db52010-01-15 13:21:36 -080017 RET
18
19// func Acos(x float64) float64
Keith Randall1f796632013-08-12 10:25:18 -070020TEXT ·Acos(SB),NOSPLIT,$0
Charles L. Dorian7f11db52010-01-15 13:21:36 -080021 FMOVD x+0(FP), F0 // F0=cos(x)
22 FMOVD F0, F1 // F0=cos(x), F1=cos(x)
23 FMULD F0, F0 // F0=cos(x)*cos(x), F1=cos(x)
24 FLD1 // F0=1, F1=cos(x)*cos(x), F2=cos(x)
25 FSUBRDP F0, F1 // F0=1-cos(x)*cos(x) (=sin(x)*sin(x)), F1=cos(x)
26 FSQRT // F0=sin(x), F1=cos(x)
27 FXCHD F0, F1 // F0=cos(x), F1=sin(x)
28 FPATAN // F0=arccos(cos(x))=x
Russ Cox07720b62013-03-22 12:57:55 -040029 FMOVDP F0, ret+8(FP)
Charles L. Dorian7f11db52010-01-15 13:21:36 -080030 RET