yulan.cpp

matlab的可执行程序

//
// MATLAB Compiler: 3.0
// Date: Wed Jul 14 12:15:03 2004
// 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" "-B" "sglcpp" "-p" "-W"
// "main" "-L" "Cpp" "-t" "-T" "link:exe" "-h" "libmmfile.mlib" "-W" "mainhg"
// "libmwsglm.mlib" "QQchabu.m" 
//
#include "yulan.hpp"
#include "libmatlbm.hpp"

static mxChar _array1_[6] = { 'd', 'a', 't', 'a', 'l', '1' };
static mwArray _mxarray0_ = mclInitializeString(6, _array1_);
static mwArray _mxarray2_ = mclInitializeDouble(1.0);

static mxChar _array4_[31] = { 'E', ':', 0x005c, 'm', 'a', 't', 'l', 'a',
                               'b', '6', '.', '5', 0x005c, 'w', 'o', 'r',
                               'k', 0x005c, 'm', 'y', 'w', 'o', 'r', 'k',
                               0x005c, 'a', '1', '.', 't', 'x', 't' };
static mwArray _mxarray3_ = mclInitializeString(31, _array4_);

static mxChar _array6_[2] = { '%', 'c' };
static mwArray _mxarray5_ = mclInitializeString(2, _array6_);
static double _ieee_plusinf_ = mclGetInf();
static mwArray _mxarray7_ = mclInitializeDouble(_ieee_plusinf_);

static mxChar _array9_[10] = { 'c', 'o', 'n', 't', 'e',
                               'n', 't', 's', '=', '1' };
static mwArray _mxarray8_ = mclInitializeString(10, _array9_);
static mwArray _mxarray10_ = mclInitializeDouble(2.0);

static mxChar _array12_[39] = { 'E', ':', 0x005c, 'm', 'a', 't', 'l', 'a',
                                'b', '6', '.', '5', 0x005c, 'w', 'o', 'r',
                                'k', 0x005c, 'm', 'y', 'w', 'o', 'r', 'k',
                                0x005c, 'j', 'i', 'u', 'd', 'e', 't', 'e',
                                's', 't', '2', '.', 't', 'x', 't' };
static mwArray _mxarray11_ = mclInitializeString(39, _array12_);

static mxChar _array14_[10] = { 'c', 'o', 'n', 't', 'e',
                                'n', 't', 's', '=', '2' };
static mwArray _mxarray13_ = mclInitializeString(10, _array14_);

void InitializeModule_yulan() {
}

void TerminateModule_yulan() {
}

static void Myulan();

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

//
// The function "yulan" contains the normal interface for the "yulan"
// M-function from file "e:\matlab6.5\work\qqmywork\yulan.m" (lines 1-19). This
// function processes any input arguments and passes them to the implementation
// version of the function, appearing above.
//
void yulan() {
    Myulan();
}

//
// The function "mlxYulan" contains the feval interface for the "yulan"
// M-function from file "e:\matlab6.5\work\qqmywork\yulan.m" (lines 1-19). The
// feval function calls the implementation version of yulan through this
// function. This function processes any input arguments and passes them to the
// implementation version of the function, appearing above.
//
void mlxYulan(int nlhs, mxArray * plhs[], int nrhs, mxArray * prhs[]) {
    MW_BEGIN_MLX();
    {
        if (nlhs > 0) {
            error(
              mwVarargin(
                mwArray(
                  "Run-time Error: File: yulan Line: 1 Column: 1"
                  " The function \"yulan\" was called with more "
                  "than the declared number of outputs (0).")));
        }
        if (nrhs > 0) {
            error(
              mwVarargin(
                mwArray(
                  "Run-time Error: File: yulan Line: 1 Column: 1"
                  " The function \"yulan\" was called with more "
                  "than the declared number of inputs (0).")));
        }
        Myulan();
    }
    MW_END_MLX();
}

//
// The function "Myulan" is the implementation version of the "yulan"
// M-function from file "e:\matlab6.5\work\qqmywork\yulan.m" (lines 1-19). 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 yulan
//
static void Myulan() {
    mwLocalFunctionTable save_local_function_table_
      = &_local_function_table_yulan;
    mwArray jiudetest2neirong = mwArray::UNDEFINED;
    mwArray fidl2 = mwArray::UNDEFINED;
    mwArray a1neirong = mwArray::UNDEFINED;
    mwArray fidl1 = mwArray::UNDEFINED;
    mwArray list1 = mwArray::UNDEFINED;
    mwArray ans = mwArray::UNDEFINED;
    mwArray datal1 = mwArray::UNDEFINED;
    //
    // load datal1 
    //
    loadc_(
      _mxarray0_,
      "a1neirong",
      &a1neirong,
      "ans",
      &ans,
      "datal1",
      &datal1,
      "fidl1",
      &fidl1,
      "fidl2",
      &fidl2,
      "jiudetest2neirong",
      &jiudetest2neirong,
      "list1",
      &list1,
      NULL);
    //
    // 
    // if list1==1
    //
    if (mclEqBool(mwVv(list1, "list1"), _mxarray2_)) {
        //
        // %open('E:\matlab6.5\work\mywork\a1.txt');   
        // fidl1=fopen('E:\matlab6.5\work\mywork\a1.txt');
        //
        fidl1 = fopen(_mxarray3_);
        //
        // a1neirong=fscanf(fidl1,'%c',inf)
        //
        a1neirong = fscanf(mwVv(fidl1, "fidl1"), _mxarray5_, _mxarray7_);
        mwVv(a1neirong, "a1neirong").Print("a1neirong");
        //
        // fclose(fidl1);
        //
        ans.EqAns(fclose(mwVv(fidl1, "fidl1")));
        //
        // fprintf('contents=1');
        //
        ans.EqAns(Nfprintf(0, _mxarray8_, mwVarargin()));
    //
    // end
    //
    }
    //
    // 
    // if list1==2
    //
    if (mclEqBool(mwVv(list1, "list1"), _mxarray10_)) {
        //
        // %open('E:\matlab6.5\work\mywork\jiudetest2.txt');   
        // fidl2=fopen('E:\matlab6.5\work\mywork\jiudetest2.txt');
        //
        fidl2 = fopen(_mxarray11_);
        //
        // jiudetest2neirong=fscanf(fidl2,'%c',inf)
        //
        jiudetest2neirong
          = fscanf(mwVv(fidl2, "fidl2"), _mxarray5_, _mxarray7_);
        mwVv(jiudetest2neirong, "jiudetest2neirong").Print("jiudetest2neirong");
        //
        // fclose(fidl2);
        //
        ans.EqAns(fclose(mwVv(fidl2, "fidl2")));
        //
        // fprintf('contents=2');
        //
        ans.EqAns(Nfprintf(0, _mxarray13_, mwVarargin()));
    //
    // end
    //
    }
    //
    // 
    //
}