c6ftest_mainhg.c

科学运算语言matlab的程序设计有关的函数code.rar

/*
 * MATLAB Compiler: 2.0.1
 * Date: Fri May 05 20:39:01 2000
 * Arguments: "-x" "-B" "sgl" "-m" "-W" "mainhg" "-L" "C" "c6ftest" 
 */

#ifndef MLF_V2
#define MLF_V2 1
#endif

#include "matlab.h"
#include "libsgl.h"
#include "c6ftest.h"

static mlfFunctionTableEntry function_table[1]
  = { { "c6ftest", mlxC6ftest, 0, 1 } };

/*
 * The function "main" is a Compiler-generated main wrapper, suitable for
 * building a stand-alone application. It initializes a function table for use
 * by the feval function, and then calls the function "mlxC6ftest". Finally, it
 * clears the feval table and exits.
 */
int main(int argc, const char * * argv) {
    int status = 0;
    mxArray * varargin = mclInitialize(NULL);
    mxArray * result = mclInitialize(NULL);
    mlfEnterNewContext(0, 0);
    mlfFunctionTableSetup(1, function_table);
    mlfHGInitialize(&argc, argv);
    mlfAssign(&varargin, mclCreateCellFromStrings(argc - 1, argv + 1));
    mlfAssign(
      &result,
      mlfFeval(
        mclValueVarargout(),
        mlxC6ftest,
        mlfIndexRef(varargin, "{?}", mlfCreateColonIndex()),
        NULL));
    mxDestroyArray(varargin);
    if (mclIsInitialized(result) && ! mxIsEmpty(result)) {
        status = mclArrayToInt(result);
    }
    mxDestroyArray(result);
    mlfHGWaitForFiguresToDie();
    mlfHGTerminate();
    mlfFunctionTableTakedown(1, function_table);
    mlfRestorePreviousContext(0, 0);
    return status;
}