13.htm

VC与Matlab混合编程文章.

      m_type DLLI scalar(m_type x); <br>
      m_type DLLI scalar(cMm x); <br>
      Mm x);c, cMm rhs);) const { return i0-1+(Mm*)pr; }x_ab] <br>
      Mm DLLI switchinit(cMm x); <br>
      **************************************************************************** 
      <br>
      <br>
      &gt;&gt;&gt; 系统常数 <br>
      ************************************************************************** 
      <br>
      extern DLLW double DLLI nargin_val; <br>
      extern DLLW double DLLI nargout_val; <br>
      extern DLLW double DLLI nargout_val; <br>
      extern DLLW int DLLI nargin_set; <br>
      extern DLLW int DLLI nargout_set; <br>
      extern DLLW Mm DLLI TICTOC; <br>
      extern DLLW Mm DLLI ans; <br>
      extern DLLW Mm DLLI i; <br>
      extern DLLW Mm DLLI j; <br>
      extern DLLW Mm DLLI pi; <br>
      extern DLLW Mm DLLI Inf; <br>
      extern DLLW Mm DLLI NaN; <br>
      extern DLLW Mm DLLI eps; <br>
      extern DLLW Mm DLLI x_M; <br>
      extern DLLW Mm DLLI semi; <br>
      extern DLLW Mm DLLI c_p; <br>
      extern DLLW Mm DLLI nop_M; <br>
      extern DLLW Mm DLLI nop_M;, cMm rhs);) const { return i0-1+(Mm*)pr; }x_ab] 
      <br>
      extern DLLW Mm DLLI zero_M; <br>
      extern DLLW Mm DLLI one_M; <br>
      extern DLLW Mm DLLI l_M; <br>
      extern DLLW Mm DLLI page_screen_output; <br>
      extern DLLW Mm DLLI implicit_str_to_num_ok; <br>
      extern DLLW Mm DLLI empty_list_elements_ok; <br>
      extern DLLW Mm DLLI switchvar; <br>
      **************************************************************************** 
      <br>
      <br>
      <br>
      <br>
      &gt;&gt;&gt; 特殊函数 <br>
      ************************************************************************** 
      <br>
      Mm DLLI airy(cMm z); <br>
      Mm DLLI airy(cMm k, cMm z); <br>
      Mm DLLI airy(cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI airy(cMm k, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI bessel(cMm nu); <br>
      Mm DLLI bessel(cMm nu, cMm z); <br>
      Mm DLLI bessel(cMm nu, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI bessela(cMm nu); <br>
      Mm DLLI bessela(cMm nu, cMm z); <br>
      rhs);) const { return i0-1+(Mm*)pr; }x_ab] <br>
      Mm DLLI bessela(cMm nu, cMm z, i_o_t, Mm&amp; J, Mm&amp; ndigits); <br>
      Mm DLLI besselh(cMm nu); <br>
      Mm DLLI besselh(cMm nu, cMm z); <br>
      Mm DLLI besselh(cMm nu, cMm k, cMm z); <br>
      Mm DLLI besselh(cMm nu, cMm k, cMm z, cMm scale1); <br>
      Mm DLLI besselh(cMm nu, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI besselh(cMm nu, cMm k, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI besselh(cMm nu, cMm k, cMm z, cMm scale1, i_o_t, Mm&amp; w, Mm&amp; 
      err); <br>
      Mm DLLI besseli(cMm nu); <br>
      Mm DLLI besseli(cMm nu, cMm z); <br>
      Mm DLLI besseli(cMm nu, cMm z); <br>
      Mm DLLI besseli(cMm nu, cMm z, cMm scale1); <br>
      Mm DLLI besseli(cMm nu, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI besseli(cMm nu, cMm z, cMm scale1, i_o_t, Mm&amp; w, Mm&amp; err); 
      <br>
      Mm DLLI besselj(cMm nu); <br>
      Mm DLLI besselj(cMm nu, cMm z); <br>
      Mm DLLI besselj(cMm nu, cMm z, cMm scale1); <br>
      Mm DLLI besselj(cMm nu, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI besselj(cMm nu, cMm z, cMm scale1, i_o_t, Mm&amp; w, Mm&amp; err); 
      <br>
      Mm DLLI besselk(cMm nu); <br>
      Mm DLLI besselk(cMm nu, cMm z); <br>
      Mm DLLI besselk(cMm nu, cMm z, cMm scale1); <br>
      Mm DLLI besselk(cMm nu, cMm z, cMm scale1); const { return i0-1+(Mm*)pr; 
      }x_ab] <br>
      Mm DLLI besselk(cMm nu, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI besselk(cMm nu, cMm z, cMm scale1, i_o_t, Mm&amp; w, Mm&amp; err); 
      <br>
      Mm DLLI bessely(cMm nu); <br>
      Mm DLLI bessely(cMm nu, cMm z); <br>
      Mm DLLI bessely(cMm nu, cMm z, cMm scale1); <br>
      Mm DLLI bessely(cMm nu, cMm z, i_o_t, Mm&amp; w, Mm&amp; err); <br>
      Mm DLLI bessely(cMm nu, cMm z, cMm scale1, i_o_t, Mm&amp; w, Mm&amp; err); 
      <br>
      **************************************************************************** 
      <br>
      <br>
      <br>
      &gt;&gt;&gt; 特殊数据类型定义 <br>
      ************************************************************************** 
      <br>
      <br>
      Mm DLLI cell(cMm x); <br>
      Mm DLLI cell(cMm x, cMm y); <br>
      Mm DLLI cell(cMm x, cMm y, cMm o); <br>
      Mm DLLI cell(cMm x, cMm y, cMm o, cMm p); <br>
      Mm DLLI cells(cMm x); <br>
      Mm DLLI cells(cMm x, cMm y); <br>
      Mm DLLI cellstr(cMm x); <br>
      Mm DLLI cell_from_array(int n, const Mm* x[]); <br>
      Mm DLLI cell2struct(cMm x); <br>
      z, cMm scale1); const { return i0-1+(Mm*)pr; }x_ab] <br>
      Mm DLLI cell2struct(cMm x, cMm f); <br>
      Mm DLLI cell2struct(cMm x, cMm f, cMm dim1); <br>
      int DLLI iscellstr(cMm x); <br>
      int DLLI isa(cMm x); <br>
      int DLLI isa(cMm x, cMm cls); <br>
      Mm DLLI mclass(cMm x); <br>
      Mm DLLI mclass(cMm x, cMm class_name); <br>
      Mm DLLI mchar(cMm varargin); <br>
      Mm DLLI mdouble(cMm x); <br>
      Mm DLLI mlogical(cMm x); <br>
      Mm DLLI muint8(cMm x); <br>
      Mm DLLI muint16(cMm x); <br>
      Mm DLLI fieldnames(cMm s); <br>
      Mm DLLI fieldnames(cMm s); <br>
      Mm DLLI isfield(cMm s); <br>
      Mm DLLI isfield(cMm s, cMm f); <br>
      Mm DLLI getfield(cMm s); <br>
      Mm DLLI getfield(cMm s, cMm varargin); <br>
      Mm DLLI mstruct(cMm varargin); <br>
      Mm DLLI setfield(cMm s); <br>
      Mm DLLI setfield(cMm s, cMm field); <br>
      Mm DLLI setfield(cMm s, cMm field, cMm v); <br>
      Mm DLLI setfield(cMm s, cMm field, cMm v);; const { return i0-1+(Mm*)pr; 
      }x_ab] <br>
      Mm DLLI struct2cell(cMm s); <br>
      Mm DLLI rmfield(cMm s); <br>
      Mm DLLI rmfield(cMm s, cMm fields); <br>
      **************************************************************************** 
      <br>
      <br>
      &gt;&gt;&gt; 异常处理函数 <br>
      **************************************************************************** 
      <br>
      <br>
      ************************************************************************** 
      <br>
      &gt;&gt;&gt; 矩阵生成函数 <br>
      **************************************************************************** 
      <br>
      <br>
      Mm DLLI cauchy(Mm x); <br>
      <br>
      Mm DLLX cauchy(Mm x, Mm y); <br>
      Mm DLLI compan(cMm x); <br>
      Mm DLLI gallery(Mm n); <br>
      Mm DLLI hadamard(Mm n); <br>
      Mm DLLI hankel(Mm c); <br>
      Mm DLLI hankel(Mm c, Mm r); <br>
      Mm DLLI hilb(Mm n); <br>
      Mm DLLI invhilb(Mm n); <br>
      cMm field, cMm v);; const { return i0-1+(Mm*)pr; }x_ab] <br>
      Mm DLLI magic(Mm n); <br>
      Mm DLLI pascalM(cMm n); <br>
      Mm DLLI pascalM(Mm n, Mm r); <br>
      Mm DLLI rosser(); <br>
      Mm DLLI toeplitz(Mm c); <br>
      Mm DLLI toeplitz(Mm c, Mm r); <br>
      Mm DLLI vander(Mm x); <br>
      Mm DLLI wilkinson(cMm n); <br>
      **************************************************************************** 
      <br>
      <br>
      * <br>
      &gt;&gt;&gt; 操作系统资源函数 <br>
      **************************************************************************** 
      <br>
      <br>
      ******* <br>
      Mm DLLI cd(); <br>
      Mm DLLI cd(); <br>
      Mm DLLI cd(cMm dir1); <br>
      Mm DLLI chdir(cMm dir1); <br>
      Mm DLLI copyfile(cMm src); <br>
      Mm DLLI copyfile(cMm src, cMm dest); <br>
      Mm DLLI deleteM(cMm filename); <br>
      Mm DLLI deleteM(cMm filename);eld, cMm v);; const { return i0-1+(Mm*)pr; 
      }x_ab] <br>
      Mm DLLI dos(cMm command); <br>
      Mm DLLI dos(cMm command, i_o_t, Mm&amp; status, Mm&amp; sout); <br>
      Mm DLLI dos(cMm command, cMm echo); <br>
      Mm DLLI dos(cMm command, cMm echo, i_o_t, Mm&amp; status, Mm&amp; sout); 
      <br>
      Mm DLLI fclose(cMm fid); <br>
      Mm DLLI feof(cMm fid); <br>
      Mm DLLI ferror(cMm fid); <br>
      Mm DLLI ferror(cMm fid, cMm clear); <br>
      Mm DLLI ferror(cMm fid, cMm clear, i_o_t, Mm&amp; msg, Mm&amp; errnum); 
      <br>
      Mm DLLI ferror(cMm fid, i_o_t, Mm&amp; msg, Mm&amp; errnum); <br>
      Mm DLLI fflush(cMm fid); <br>
      Mm DLLI fgetl(cMm fid); <br>
      Mm DLLI fgets(cMm fid); <br>
      Mm DLLI fgets(cMm fid, cMm nchar); <br>
      Mm DLLI filesep(); <br>
      Mm DLLI fopen(cMm filename); <br>
      Mm DLLI fopen(cMm filename, cMm permission); <br>
      <br>
      Mm DLLI fopen(cMm filename, cMm permission, cMm machine); <br>
      Mm DLLI fopen(cMm filename, cMm permission, cMm machine, i_o_t, Mm&amp; 
      fid, Mm&amp; <br>
      <br>
      msg); <br>
      msg);I deleteM(cMm filename);eld, cMm v);; const { return i0-1+(Mm*)pr; 
      }x_ab] <br>
      Mm DLLI fopen(cMm filename, cMm permission, i_o_t, Mm&amp; fid, Mm&amp; 
      msg); <br>
      Mm DLLI fopen(cMm filename, i_o_t, Mm&amp; fid, Mm&amp; msg); <br>
      Mm DLLI fopen(cMm fid, i_o_t, Mm&amp; filename, Mm&amp; permission, Mm&amp; 
      machine); <br>
      Mm DLLI fprintf(cMm fid, cMm format1); <br>
      Mm DLLI fprintf(cMm fid, cMm format1, cMm varargin); <br>
      Mm DLLI fprintf(cMm x); <br>
      Mm DLLI fread(cMm fid); <br>
      Mm DLLI fread(cMm fid, cMm size); <br>
      Mm DLLI fread(cMm fid, cMm size, cMm precision); <br>
      Mm DLLI fread(cMm fid, cMm size, cMm precision, cMm skip); <br>
      Mm DLLI fread(cMm fid, cMm size, cMm precision, cMm skip, c
      <p></p>
      <p></p>
      <p><br>
        <br>
      </p>
      </td>
    <td height="6359" width="9%">&nbsp;</td>
  </tr>
  <tr>
    <td height="2" width="7%">&nbsp;</td>
    <td height="2" width="84%">&nbsp;</td>
    <td height="2" width="9%">&nbsp;</td>
  </tr>
</table>
</body>
</html>