Mercurial > forge

changeset 9649:76f873c761b3 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Code simplified
author mmarzolla
date Mon, 12 Mar 2012 19:37:46 +0000
parents ff2c3baffb69
children 5c36eb3368f7
files main/queueing/inst/ctmc_taexps.m
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/main/queueing/inst/ctmc_taexps.m	Mon Mar 12 18:35:30 2012 +0000
+++ b/main/queueing/inst/ctmc_taexps.m	Mon Mar 12 19:37:46 2012 +0000
@@ -103,9 +103,8 @@
       M = lsode( {ff, fj}, zeros(size(p)), t );
     endif
   else 
-    t = ctmc_mtta(Q,p);
     L = ctmc_exps(Q,p);
-    M = L ./ t;
+    M = L ./ sum(L);
   endif
 endfunction
 %!test