Mercurial > hg > octave-nkf
view test/octave.test/arith/csc-1.m @ 7217:c8abc18322b7
[project @ 2007-11-29 20:50:24 by jwe]
author | jwe |
---|---|
date | Thu, 29 Nov 2007 20:50:24 +0000 |
parents | fa632c35437a |
children |
line wrap: on
line source
rt2 = sqrt (2); rt3 = sqrt (3); x = [pi/6, pi/4, pi/3, pi/2, 2*pi/3, 3*pi/4, 5*pi/6]; v = [2, rt2, 2*rt3/3, 1, 2*rt3/3, rt2, 2]; all (abs (csc (x) - v) < sqrt (eps))