SCCS-vsn: old/libm/liboldnm/asin.s 5.1
SCCS-vsn: old/libm/liboldnm/atan.s 5.1
SCCS-vsn: old/libm/liboldnm/cbrt.s 5.1
SCCS-vsn: old/libm/liboldnm/exp.s 5.1
SCCS-vsn: old/libm/liboldnm/log.s 5.1
SCCS-vsn: old/libm/liboldnm/sin.s 5.1
SCCS-vsn: old/libm/liboldnm/acos.c 5.1
SCCS-vsn: old/libm/liboldnm/pow.c 5.1
SCCS-vsn: old/libm/liboldnm/sinh.s 5.1
SCCS-vsn: old/libm/liboldnm/sqrt.s 5.1
SCCS-vsn: old/libm/liboldnm/tan.s 5.1
SCCS-vsn: old/libm/liboldnm/tanh.s 5.1
SCCS-vsn: old/libm/liboldnm/badtan.s 5.1
SCCS-vsn: old/libm/liboldnm/mcount.sed 5.1
SCCS-vsn: old/libm/liboldnm/Makefile 5.1
15 files changed:
-SCCSID = "@(#)Makefile 1.1 %G%"
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)Makefile 5.1 (Berkeley) %G%
+#
+SCCSID = "%W (Berkeley) %G%"
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved. The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)acos.c 5.1 (Berkeley) %G%";
+#endif not lint
+
/*
acos(arg) return the arccos,
respectively of their arguments.
/*
acos(arg) return the arccos,
respectively of their arguments.
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)asin.s 5.1 (Berkeley) %G%
+#
+#
#double asin(arg)
#double arg; -1.0<=arg<=1.0 or an out of range error return
#method: call atan() after range reduction
#double asin(arg)
#double arg; -1.0<=arg<=1.0 or an out of range error return
#method: call atan() after range reduction
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)atan.s 5.1 (Berkeley) %G%
+#
+#
# double atan(arg1); -pi/2 < atan < pi/2
#double atan2(arg1,arg2); -pi< atan2<pi
#double arg1,arg2
# double atan(arg1); -pi/2 < atan < pi/2
#double atan2(arg1,arg2); -pi< atan2<pi
#double arg1,arg2
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)badtan.s 5.1 (Berkeley) %G%
+#
+#
# double tan(arg)
# double arg;
#method: range reduction to [0,pi/4] followed by polynomial
# double tan(arg)
# double arg;
#method: range reduction to [0,pi/4] followed by polynomial
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)cbrt.s 5.1 (Berkeley) %G%
+#
+#
# double cbrt(arg)
# double arg
# no error exits
# double cbrt(arg)
# double arg
# no error exits
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)exp.s 5.1 (Berkeley) %G%
+#
+#
# double exp(arg)
# double arg; 0<= arg< 88
# double exp10(arg)
# double exp(arg)
# double arg; 0<= arg< 88
# double exp10(arg)
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)log.s 5.1 (Berkeley) %G%
+#
+#
# double log(arg) ; natural logarithm
# double log10(arg); base 10 log
# double arg
# double log(arg) ; natural logarithm
# double log10(arg); base 10 log
# double arg
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)mcount.sed 5.1 (Berkeley) %G%
+#
s/.word 0x0.*$/&\
.data\
1:\
s/.word 0x0.*$/&\
.data\
1:\
+/*
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved. The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)pow.c 5.1 (Berkeley) %G%";
+#endif not lint
+
/*
computes a^b.
uses log and exp
/*
computes a^b.
uses log and exp
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)sin.s 5.1 (Berkeley) %G%
+#
+#
# double float sin(),cos()
#coefficients are from Hart & Cheney SIN3370 (18.80D)
.text
# double float sin(),cos()
#coefficients are from Hart & Cheney SIN3370 (18.80D)
.text
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)sinh.s 5.1 (Berkeley) %G%
+#
+#
# double _sinh(arg)
# double _cosh(arg)
# double arg
# double _sinh(arg)
# double _cosh(arg)
# double arg
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)sqrt.s 5.1 (Berkeley) %G%
+#
+#
# double sqrt(arg):revised July 18,1980
# double arg
# if(arg<0.0) { _errno=EDOM; return(-sqrt(-arg)) }
# double sqrt(arg):revised July 18,1980
# double arg
# if(arg<0.0) { _errno=EDOM; return(-sqrt(-arg)) }
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)tan.s 5.1 (Berkeley) %G%
+#
+#
# double tan(arg)
# double arg;
#method: range reduction to [0,pi/4] followed by polynomial
# double tan(arg)
# double arg;
#method: range reduction to [0,pi/4] followed by polynomial
+#
+# Copyright (c) 1980 Regents of the University of California.
+# All rights reserved. The Berkeley software License Agreement
+# specifies the terms and conditions for redistribution.
+#
+# @(#)tanh.s 5.1 (Berkeley) %G%
+#
+#
# double tanh(arg)
# double arg
# method: tanh(arg)=sinh(arg)/cosh(arg); if |arg|<0.5 sinh(9 is computed from
# double tanh(arg)
# double arg
# method: tanh(arg)=sinh(arg)/cosh(arg); if |arg|<0.5 sinh(9 is computed from