Mercurial > octave-nkf
view examples/myhello.c @ 15535:fe159d11b864 stable
increase tolerance for svds test
* svds.m: Increase tolerance for svds (speye (10)) test.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Wed, 17 Oct 2012 10:46:15 -0400 |
parents | 4295d634797d |
children | be41c30bcb44 |
line wrap: on
line source
#include "mex.h" void mexFunction (int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[]) { mxArray *v = mxCreateDoubleMatrix (1, 1, mxREAL); double *data = mxGetPr (v); *data = 1.23456789; plhs[0] = v; }