equationsolve.cpp

是c++语言所写

//
// MATLAB Compiler: 3.0
// Date: Wed Oct 08 19:34:55 2008
// Arguments: "-B" "macro_default" "-O" "all" "-O" "fold_scalar_mxarrays:on"
// "-O" "fold_non_scalar_mxarrays:on" "-O" "optimize_integer_for_loops:on" "-O"
// "array_indexing:on" "-O" "optimize_conditionals:on" "-t" "-L" "Cpp"
// "equationSolve" 
//
#include "equationsolve.hpp"
#include "libmatlbm.hpp"

void InitializeModule_equationsolve() {
}

void TerminateModule_equationsolve() {
}

static mwArray Mequationsolve(int nargout_, mwArray factor, mwArray variable);

_mexLocalFunctionTable _local_function_table_equationsolve
  = { 0, (mexFunctionTableEntry *)NULL };

//
// The function "equationsolve" contains the normal interface for the
// "equationsolve" M-function from file "c:\documents and
// settings\wangqj\桌面\光谱反演\解方程\equationsolve.m" (lines 1-3). This
// function processes any input arguments and passes them to the implementation
// version of the function, appearing above.
//
mwArray equationsolve(mwArray factor, mwArray variable) {
    int nargout = 1;
    mwArray value = mwArray::UNDEFINED;
    value = Mequationsolve(nargout, factor, variable);
    return value;
}

//
// The function "mlxEquationsolve" contains the feval interface for the
// "equationsolve" M-function from file "c:\documents and
// settings\wangqj\桌面\光谱反演\解方程\equationsolve.m" (lines 1-3). The feval
// function calls the implementation version of equationsolve through this
// function. This function processes any input arguments and passes them to the
// implementation version of the function, appearing above.
//
void mlxEquationsolve(int nlhs, mxArray * plhs[], int nrhs, mxArray * prhs[]) {
    MW_BEGIN_MLX();
    {
        mwArray mprhs[2];
        mwArray mplhs[1];
        int i;
        mclCppUndefineArrays(1, mplhs);
        if (nlhs > 1) {
            error(
              mwVarargin(
                mwArray(
                  "Run-time Error: File: equationsolve Line: 2 Column"
                  ": 1 The function \"equationsolve\" was called with"
                  " more than the declared number of outputs (1).")));
        }
        if (nrhs > 2) {
            error(
              mwVarargin(
                mwArray(
                  "Run-time Error: File: equationsolve Line: 2 Column"
                  ": 1 The function \"equationsolve\" was called with"
                  " more than the declared number of inputs (2).")));
        }
        for (i = 0; i < 2 && i < nrhs; ++i) {
            mprhs[i] = mwArray(prhs[i], 0);
        }
        for (; i < 2; ++i) {
            mprhs[i].MakeDIN();
        }
        mplhs[0] = Mequationsolve(nlhs, mprhs[0], mprhs[1]);
        plhs[0] = mplhs[0].FreezeData();
    }
    MW_END_MLX();
}

//
// The function "Mequationsolve" is the implementation version of the
// "equationsolve" M-function from file "c:\documents and
// settings\wangqj\桌面\光谱反演\解方程\equationsolve.m" (lines 1-3). It
// contains the actual compiled code for that M-function. It is a static
// function and must only be called from one of the interface functions,
// appearing below.
//
//
// 
// function[value] = EquationsSolution(factor, variable)
//
static mwArray Mequationsolve(int nargout_, mwArray factor, mwArray variable) {
    mwLocalFunctionTable save_local_function_table_
      = &_local_function_table_equationsolve;
    mwArray value = mwArray::UNDEFINED;
    //
    // variable = factor\value;
    //
    variable = mldivide(mwVa(factor, "factor"), mwVv(value, "value"));
    mwValidateOutput(value, 1, nargout_, "value", "equationsolve");
    return value;
}