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))