Mercurial > hg > octave-nkf

annotate test/octave.test/linalg/expm-3.m @ 5301:9302581b820d ss-2-9-2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-04-22 17:08:07 by jwe]
author jwe
date Fri, 22 Apr 2005 17:09:11 +0000
parents 6c4677ba0784
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5227
6c4677ba0784 [project @ 2005-03-18 04:04:04 by jwe]
jwe
parents:
diff changeset
1 arg = diag ([6, 6, 6], 1);
6c4677ba0784 [project @ 2005-03-18 04:04:04 by jwe]
jwe
parents:
diff changeset
2 result = [1, 6, 18, 36;
6c4677ba0784 [project @ 2005-03-18 04:04:04 by jwe]
jwe
parents:
diff changeset
3 0, 1, 6, 18;
6c4677ba0784 [project @ 2005-03-18 04:04:04 by jwe]
jwe
parents:
diff changeset
4 0, 0, 1, 6;
6c4677ba0784 [project @ 2005-03-18 04:04:04 by jwe]
jwe
parents:
diff changeset
5 0, 0, 0, 1];
6c4677ba0784 [project @ 2005-03-18 04:04:04 by jwe]
jwe
parents:
diff changeset
6 all (all (expm (arg) == result))