curvefit_com.cpp

用MATLAB函数进行非线性拟合

#include "curvefit_com.hpp"



#ifdef __cplusplus
extern "C" {
#endif
extern const unsigned char __MCC_Curvefit_public_data[];
extern const char *__MCC_Curvefit_name_data;
extern const char *__MCC_Curvefit_root_data;
extern const unsigned char __MCC_Curvefit_session_data[];
extern const char *__MCC_Curvefit_matlabpath_data[];
extern const int __MCC_Curvefit_matlabpath_data_count;
extern const char *__MCC_Curvefit_mcr_runtime_options[];
extern const int __MCC_Curvefit_mcr_runtime_option_count;
extern const char *__MCC_Curvefit_mcr_application_options[];
extern const int __MCC_Curvefit_mcr_application_option_count;
#ifdef __cplusplus
}
#endif



CCurvefit::CCurvefit()
{
    if (!mclInitializeComponentInstance(&m_hinst, __MCC_Curvefit_public_data,
                                        __MCC_Curvefit_name_data,
                                        __MCC_Curvefit_root_data,
                                        __MCC_Curvefit_session_data,
                                        __MCC_Curvefit_matlabpath_data,
                                        __MCC_Curvefit_matlabpath_data_count,
                                        __MCC_Curvefit_mcr_runtime_options,
                                        __MCC_Curvefit_mcr_runtime_option_count,
                                        true, COMObject, LibTarget,
                                        g_Module.getPath(), NULL, NULL))
        Error("Could not create MCR instance");
}
CCurvefit::~CCurvefit()
{
    if (m_hinst)
        mclTerminateInstance(&m_hinst);
}

HRESULT __stdcall CCurvefit::mycurvefit3(/* [in] */ long nargout,
                                         /* [in,out] */ VARIANT* a,
                                         /* [in] */ VARIANT x,
                                         /* [in] */ VARIANT y,
                                         /* [in] */ VARIANT a0) {
    return( CallComFcn( "mycurvefit3", (int) nargout,
                        1, 3, a, &x, &y, &a0 ) );
}


HRESULT __stdcall CCurvefit::mycurvefit4(/* [in] */ long nargout,
                                         /* [in,out] */ VARIANT* a,
                                         /* [in] */ VARIANT x,
                                         /* [in] */ VARIANT y,
                                         /* [in] */ VARIANT a0) {
    return( CallComFcn( "mycurvefit4", (int) nargout,
                        1, 3, a, &x, &y, &a0 ) );
}


HRESULT __stdcall CCurvefit::mycurvefit5(/* [in] */ long nargout,
                                         /* [in,out] */ VARIANT* a,
                                         /* [in] */ VARIANT x,
                                         /* [in] */ VARIANT y,
                                         /* [in] */ VARIANT a0) {
    return( CallComFcn( "mycurvefit5", (int) nargout,
                        1, 3, a, &x, &y, &a0 ) );
}


HRESULT __stdcall CCurvefit::mycurvefit6(/* [in] */ long nargout,
                                         /* [in,out] */ VARIANT* a,
                                         /* [in] */ VARIANT x,
                                         /* [in] */ VARIANT y,
                                         /* [in] */ VARIANT a0) {
    return( CallComFcn( "mycurvefit6", (int) nargout,
                        1, 3, a, &x, &y, &a0 ) );
}


HRESULT __stdcall CCurvefit::mygauss3(/* [in] */ long nargout,
                                      /* [in,out] */ VARIANT* f,
                                      /* [in] */ VARIANT a,
                                      /* [in] */ VARIANT t) {
    return( CallComFcn( "mygauss3", (int) nargout, 1, 2, f, &a, &t ) );
}


HRESULT __stdcall CCurvefit::mygauss4(/* [in] */ long nargout,
                                      /* [in,out] */ VARIANT* f,
                                      /* [in] */ VARIANT a,
                                      /* [in] */ VARIANT t) {
    return( CallComFcn( "mygauss4", (int) nargout, 1, 2, f, &a, &t ) );
}


HRESULT __stdcall CCurvefit::mygauss5(/* [in] */ long nargout,
                                      /* [in,out] */ VARIANT* f,
                                      /* [in] */ VARIANT a,
                                      /* [in] */ VARIANT t) {
    return( CallComFcn( "mygauss5", (int) nargout, 1, 2, f, &a, &t ) );
}


HRESULT __stdcall CCurvefit::mygauss6(/* [in] */ long nargout,
                                      /* [in,out] */ VARIANT* f,
                                      /* [in] */ VARIANT a,
                                      /* [in] */ VARIANT t) {
    return( CallComFcn( "mygauss6", (int) nargout, 1, 2, f, &a, &t ) );
}


HRESULT __stdcall CCurvefit::mysum3(/* [in] */ long nargout,
                                    /* [in,out] */ VARIANT* s,
                                    /* [in] */ VARIANT a,
                                    /* [in] */ VARIANT t) {
    return( CallComFcn( "mysum3", (int) nargout, 1, 2, s, &a, &t ) );
}


HRESULT __stdcall CCurvefit::mysum4(/* [in] */ long nargout,
                                    /* [in,out] */ VARIANT* s,
                                    /* [in] */ VARIANT a,
                                    /* [in] */ VARIANT t) {
    return( CallComFcn( "mysum4", (int) nargout, 1, 2, s, &a, &t ) );
}


HRESULT __stdcall CCurvefit::mysum5(/* [in] */ long nargout,
                                    /* [in,out] */ VARIANT* s,
                                    /* [in] */ VARIANT a,
                                    /* [in] */ VARIANT t) {
    return( CallComFcn( "mysum5", (int) nargout, 1, 2, s, &a, &t ) );
}


HRESULT __stdcall CCurvefit::mysum6(/* [in] */ long nargout,
                                    /* [in,out] */ VARIANT* s,
                                    /* [in] */ VARIANT a,
                                    /* [in] */ VARIANT t) {
    return( CallComFcn( "mysum6", (int) nargout, 1, 2, s, &a, &t ) );
}