Mercurial > octave-nkf
view test/octave.test/linalg/expm-3.m @ 5227:6c4677ba0784
[project @ 2005-03-18 04:04:04 by jwe]
author | jwe |
---|---|
date | Fri, 18 Mar 2005 04:04:04 +0000 |
parents | |
children |
line wrap: on
line source
arg = diag ([6, 6, 6], 1); result = [1, 6, 18, 36; 0, 1, 6, 18; 0, 0, 1, 6; 0, 0, 0, 1]; all (all (expm (arg) == result))