Mercurial > hg > octave-nkf

view test/octave.test/arith/sqrt-2.m @ 7217:c8abc18322b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-29 20:50:24 by jwe]
author jwe
date Thu, 29 Nov 2007 20:50:24 +0000
parents 87c2e107f811
children
line wrap: on
line source

t1 = exp (0.5 * log (i));
t2 = exp (0.5 * log (1-i));
all (all (abs (sqrt ([4, -4; i, 1-i]) - [2, 2i; t1, t2]) < sqrt (eps)))