Mercurial > forge

changeset 12411:b7bdd690c6b6 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix bug
author cdf
date Sun, 30 Mar 2014 15:59:00 +0000
parents b3f18daf312a
children d3da1a3fda79
files extra/bim/inst/bim1a_advection_diffusion.m
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/extra/bim/inst/bim1a_advection_diffusion.m	Sun Mar 30 15:58:05 2014 +0000
+++ b/extra/bim/inst/bim1a_advection_diffusion.m	Sun Mar 30 15:59:00 2014 +0000
@@ -71,11 +71,11 @@
   
   if (! (isvector (alpha) && isvector (gamma) && isvector (eta)))
     error ("bim1a_advection_diffusion: coefficients are not valid vectors.");
-  elseif (length (alpha) != nelem)
+  elseif (numel (alpha) != nelem)
     error ("bim1a_advection_diffusion: length of alpha is not equal to the number of elements.");
-  elseif (length (gamma) != nnodes)
+  elseif (numel (gamma) != nnodes)
     error ("bim1a_advection_diffusion: length of gamma is not equal to the number of nodes.");
-  elseif (length (eta) != nnodes)
+  elseif (numel (eta) != nnodes)
     error ("bim1a_advection_diffusion: length of eta is not equal to the number of nodes.");
   endif