Sophie

Sophie

distrib > Fedora > 18 > i386 > by-pkgid > 7be3a0df92996a55ea4a48648c87895b > files > 34

octave-doc-3.6.4-1.fc18.noarch.rpm

#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;
}