Mercurial > octave

view test/octave.test/arith/acot-1.m @ 2761:873b1ef30534

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-02-28 03:05:27 by jwe]
author jwe
date Fri, 28 Feb 1997 03:05:28 +0000
parents fa632c35437a
children 5e2c68946f30
line wrap: on
line source

rt2 = sqrt (2);
rt3 = sqrt (3);
v = [pi/6, pi/4, pi/3, pi/2, 2*pi/3, 3*pi/4, 5*pi/6];
x = [rt3, 1, rt3/3, 0, -rt3/3, -1, -rt3];
all (abs (acot (x) - v) < sqrt (eps))