Mercurial > hg > octave-lyh
diff examples/addtwomatrices.cc @ 6572:8e7148b84b59
[project @ 2007-04-25 04:13:44 by jwe]
author | jwe |
---|---|
date | Wed, 25 Apr 2007 04:14:49 +0000 |
parents | |
children | 4270ded9ddc6 |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/examples/addtwomatrices.cc @@ -0,0 +1,16 @@ +#include <octave/oct.h> + +DEFUN_DLD (addtwomatrices, args, , "Add A to B") +{ + int nargin = args.length (); + if (nargin != 2) + print_usage (); + else + { + NDArray A = args(0).array_value (); + NDArray B = args(1).array_value (); + if (! error_state) + return octave_value (A + B); + } + return octave_value_list (); +}