3.1.1 Matcom能作什么
Matcom是一个十分有用的.m文件翻译器(Replacement)，它的主要优点我认为有 以下几点：
1>它提供了matlab中.m文件与其他高级语言的接口，使.m文件可以编译为脱离matlab环境独立执行的可执行性程序，这样 。提高了代码的复用率 。提高了代码的执行速度。使纯文本的.m文件变为二进制的可执行程序，增加了知识保护的安全性
2>它提供了近千个数学函数，对于其他高级语言编译器来说，提供了一个丰富?[Matlab] 的数学库，基本上在matlab上能用的常用函数都可以在高级语言中直接调用。 数学函数主要包括： 。矩阵属性函数 。矩阵生成函数 。矩阵生成函数 。矩阵操作函数 。矩阵变换函数 。数学函数.特殊函数 。数值函数 。串函数 。绘图函数 。颜色函数 。函数函数。存盘及读文件 。系统资源函数 。系统操作函数 。判断函数(Is函数族) 。付氏变换 等等，可参见本文附录 提供了.m文件的方便快捷的编译调适环境，可以step, watch，breakpoint等各种 调试手段。
3.1.2 Matcom的工作原理 Matcom的矩阵运算部分是基于一个名为Matrix的C++数学库，这个库提供了 绝大多数的关于矩阵类、矩阵操作函数、数值计算函数、数学函数等的定义，在 Matcom中是以lib目录下的*.lib以及windows/system/对应名称的dll文件提供的。
Matcom的另一大部分就是图形部分，它是用一种非常流行的绘图OCX控件Teechart来 实现的，这种控件对于一般的绘图功能都可以实现，但也存在一定缺陷。在 Matcom4.5版本中使用的是TeeChart3.0。绘图函数功能主要在lib文件和 window/system/ago*.dll中定义的。
Matcom编译.m文件是先将.m文件按照与matcom的Cpp库的对应关系，翻译为CPP源代码， 然后用对应版本的C编译器将该CPP文件编译为exe或dll文件，所以，在第一次运行时 让指定CComplier的路径是必需的，否则将无法编译。指定好的C Complier的信息写在Matcom/bin/matcom.ini文件
中。
3.1.3 Matcom的不足
Matcom并不是全能的，对于大多数Matlab函数都可以进行CPP实现，但有些由于其功能有限，只能期待以后的版本来不断补充了。 总的来说，matcom有以下缺欠：
1.对class数据类型部分支持
2.eval,feval,clear等语句不能在C中实现(如果实现的话，一个文本编辑器就可以成为 一个matlab了:))
3.图形窗口有些不仅如人意，如fill3,hide等语句无法实现，surf等语句也无法画出象 matlab中哪样精细的图像来，特别是色彩比较难看:( 等等
3.1.4 Matcom下载地址及网络资源
下载地址是版上询问最多的问题，再次建议大家能到教育网的搜索引擎
http://pccms.pku.edu.cn:8000/ http://search.igd.edu.cn
http://soft.cs.uestc.edu.cn/search.php 搜索关键字matcom或MIDEVA，可以查找教育网上的最新的matcom资源
Matcom的开发者Mathtools公司地址是 http://www.mathtools.com/上面也提供了免费下载服务他们还会给你一个evaluation key)，如果你从哪里下载，他们会给你定期发email告诉最新的动态。大家可以定期到公司主页看看有没有版本更新
3.2版本及安装注意事项
3.2.1Matcom4.0的安装
由于matcom4.0所代的dll文件相对较小，所以便于发布小型程序，所以这里也对它作一定讨论。matcom4.0在第一次使用时需要你输入口令，否则无法运行，不过网上已经有matcom4的注册机，可以查找一个叫regmat4.exe的小程序，输入你想使用的时间区间，然后就会产生一个合法口令，输入这个口令后，mideva在window目录建立一个名字叫mt_eval.txt的文本文件，里面就保存了你输入的口令，不过你也可以在执行matcom之前直接建立这个文件，在里面写1/1/1999-1/1/2010-64562264就可使用到2010年。通过了口令后，它还有一些限制，如绘图时间不超过60分钟限制，绘图时出现版权对话b]框等，不过这些已经被energy等诸位大虾给破解了具体如下 energy: 使用PLOT功能时会出现一个对话框,可以这样去掉:
C:\Windows\system\ago.dll FIND: 83 C4 08 85 C0 75 05 REP : -- -- -- -- -- EB -- 如果还想去掉figure标题栏上的[Evaluation software]: FIND: 43 61 70 74 75 72 65 00 205B REP : -- -- -- -- -- -- -- -- -- 00 huangfh (hoho)对60分钟时间的破解, 就比较完整了: FIND : 2B D1 81 FA 10 0E 00 00 7E 10 REP : -- -- -- -- -- -- -- -- EB --
3.2.2 Matcom 4.5 的安装
感谢energy的破解，Matcom4.5的口令为FREE-4.5-1193046-80295111 matcom4.5在安装时需要你输入口令，mideva在window的注册表中KEY_CURRENT_USER\Software\MathTools\Matcom\4.50\License\ 下面添加一个键，键名默认，键值为FREE-4.5-1193046-80295111om\4.50\License\ 下面添加一个键，键名默认，键值为FREE-4.5-1193046-80295111 你如果删除它，再次启动matcom的时候，就会再次询问口令。 不过好在如果通过这个口令之后，程序发布时就不再有限制了，也 就是在这个注册后的系统中编译的程序，发布时就不用代一个注册
文件了
3.3 用Matcom翻译m文件
直接调适M文件：在主界面上打开.m文件的主文件，在菜单中选择compile to exe or dll 就可以了，你也可以设置断点后，就可以查看变量的值，这些将在主窗口 的一侧出现，双击就可得到其当前值。 编译后的cpp、exe、dll文件都在matcom 当前工作目录下，如果是debug模式，就在 dubug目录下找，否则就在Release目录下找。
3.4 在CB中C++与Matlab语言混编
这种方法是我最喜欢的方法，因为这样不但可以发挥matcom强大的数学计算功能， 还可以结合可视化编译环境来进行界面开发，可以制作完整的应用计算软件， 交付用户使用。 我所用的可视IDE是Inprise公司的C++Builder 3.0/4.0，matcom版本为4.0/4.5, 注意，在4.0上只能使用matcom4.5版本。 在进行编程之前你需要作如下准备工作
1.选择菜单New\Console Wizard\Console Exe，建立一个Win32位DOS程序
2.将matcom\lib\matlib.h拷贝到CB\include目录下 将matcom\lib\v4500b.lib拷贝到CB\lib目录下
3.选择菜单Project\Add to project\选择lib\v4500.lib
于是程序变为
#pragma hdrstop
#include
#include "stdio.h"
#include
"matlib.h"
//---------------------------------------------------------------------------
US
ELIB("v4500b.lib");
//-----------------------------------------------------------
---------------- #pragma argsused int main(int argc, char **argv) {
/************
*****************************/ // Please Write Your Code Here */
/***************
**************************/ return 0; return 0;能使用matcom4.5版本。 }
3.选择菜单Project\Add to Reportaries\ 将该工程存为Project中的一个模板。
3.选择菜单Project\Add to Reportaries\ 将该工程存为Project中的一个模板。 OK,现在可以进行你所需要的工作了。 用菜单你存为的模板建立一个新的工程，在代码段写 dMm(a); //define a Matrix class a=zeros(3); //Let the matrix be a 3*3 zero matrix disp(a); //Display the matrix 运行一下看看，程序会打印出3*3的0零阵 稍微复杂一点的程序dMm(a);dMm(b);dMm(c); //声明三个矩阵 a=rand(3,2); //生成3*2随机阵 b=zeros(3,2); c=a+b; //矩阵相加 c(1,c_p)=a(2,c_p); //matlab中写为c(1,:)=a(2,:) c=ctranspose(c); //矩阵转置 disp(c);printf("\n"); disp(a);printf("\n"); getch(); c(colon(1,1,3))=a(colon(1,2,5)); //matlab中写为c([1:1:3])=a([1:2:5]) disp(c); getch(); getch();
可以发现在matlab中常用的一些表示都可以在matcom中找到对应，并且同样 方便有效。再举一个绘图的例子，就用matcom自己带的例子吧 subplot(121.0); //subplot(1,2,1)
surf((CL(peaks(25.0)))); //surf(peaks(25))
subplot(122.0); //subplot(1,2,2)
pcolor((CL(peaks(25.0)))); //pcolor(peaks(25))
colormap(TM("copper")); //colormap('copper')
drawnow() //必须有这句，否则只画一个图出来 //这是我问他们的技术支持搞到的
可以看到基本上是一句对一句，没有什么多余的话。所以习惯编写 matlab程序的同志写matcom C的语句来也应该没有什么问题。 (但上面这个程序确实有问题，在mideva中编译后第二个subplot 是可以正常画出来的，但在CB中编译就只画一个subplot乐，具体 画一个subplot
乐，具体原因希望大家讨论，我现在也在试),mideva 编译该语句的指令是 bcc32 文件名
-IC:\MATCOM45\lib -H=matlib.csm -v -a4 -5 -e EXEFLAGS= -WC DLLFLAGS= -WD
我想CB中可能要改option,大家试试看。 总的说来，决大多数的matlab的语句都可
以轻
松移植到CB中来，所以就可以直接在 CB中写matlab程序了，只是大家要注意几个关键的
函数
colon(xstart,xstep,xstop) == xstart:xstep:xstop (CL(A1),A2,A3....) ==
(A1,A2,A3,
...)一个矩阵行，大多数 多参数输入函数都用到CL (BR(a1),a2,a3....) ==
(a1,a2,a3...)
TM("a string") == 'a string' TM将char *变为串矩阵 c_p == : 整行或整列 i_o
== [ou
t =fun(in)就写为fun(in, i_o, out) 其他的大家编几个程序就清楚了。
3.6 程序的发布
matcom可以用C编译器把.m文件编译为为stand_alone的程序，所以，基本上 不需要
mat
lab系统，但一些必要的dll文件还是需要的，这些dll在window\system\ 下面，(在4.5
版本中
)大概有ago4500.dll,v4500v.dll,opengl32.dll, glu32.dll等 四个文件 如果用的是4.
0版本
，发布时要把ago.dll,mlib4...dll(计不清楚了),opengl32.dll和 glu32.dll打到安装
盘中，
大概3M,然后在window目录安装一个名字叫mt_eval.txt的 文本文件，里面写1/1/1999-1
/1/2
010-64562264即可
附录：Matcom C数学库函数列表(部分)
这是一个丰富的数学库，约600个函数，包括sim()函数
--------------------------------------------------------------------------
矩阵基础类
系统常数
特殊函数
异常处理函数
矩阵生成函数
操作系统资源函数
数值计算函数
数学函数
矩阵操作函数
矩阵属性函数
图形函数
颜色函数
用户介面函数
is*函数族
mex函数
字符串函数
字符串函数
类型转换函数
**************************************************************************
>>> 矩阵基础类
**************************************************************************
class Mm
{
DLLI Mm();
DLLI Mm(int isc, int iss, int nonzeros, int nrows, int ncols, mt_matrix_ty
pes new_type=mt_double_matrix);
DLLI Mm(int isc, int iss, int nonzeros, int new_ndims, const int new_dims[
max_ndims], mt_matrix_types new_type=mt_double_matrix);
DLLI Mm(i_o_t, const char* mname, int isglobal);
DLLI Mm(const char* mname, int m, int n);
DLLI Mm(int aisc, cMm x, cMm y, cMm dim1, op_t op, int do_dim, Mm& minmax_
b]
idx);
DLLI Mm(m_type src);
DLLI Mm(cMm src);
DLLI Mm(cMm src, const char* mname);
DLLI Mm(const Mc& src);
DLLI Mm(cMr src, int err=1);
DLLI ~Mm();
Mm RDLLI operator =(cMm src);
void DLLI deepcopy(cMm src, mt_matrix_types new_type=mt_uninit_matrix);
void DLLI deepcopy(int isc, cMm src, mt_matrix_types new_type=mt_uninit_ma
trix);
void DLLI deepcopy(int isc, int iss, cMm src, mt_matrix_types new_type=mt_
uninit_matrix);
int DLLI getreal(int force=0) const;
int DLLI getcomplex();
void DLLI collapse();
inline int DLLI rows() const { return dims[0]; }
inline int DLLI cols() const { return dims[1]; }
int DLLI size() const;
int DLLI size() const;x, cMm y, cMm dim1, op_t op, int do_dim, Mm&
minmax_ab]
int DLLI size(int dim) const;
int DLLI nsingleton() const;
int DLLI vectordim() const;
int DLLI length() const;
const char PDLLI getname() const { return self_name; }
void DLLI setname(const char* new_name);
int DLLI isstr() const { return (flags.str!=0); }
void DLLI setstr(int newd);
inline int DLLI issparse() const { return (flags.sparse!=0); }
void DLLI setsparse(int sp);
inline int DLLI islogical() const { return (flags.logical!=0); }
{ return (flags.logical!=0); }
void DLLI setlogical(int newd);
inline int DLLI isglobal() const { return (flags.global!=0); }
inline int DLLI isstruct() const { return (fields!=NULL); }
inline int RDLLI getndims() const { return (int&)ndims; }
inline int PDLLI getdims() const { return (int*)dims; }
inline M_types RDLLI getflags() { return flags; }
inline mt_matrix_types DLLI gettype() const { return flags.type; }
inline int DLLI getnfields() const { return nfields; }
inline const char PPDLLI getfields() const { return fields; }
inline int DLLI isc() const { return (pi!=NULL); }
int do_dim, Mm& minmax_ab]
int DLLI issamename(const char *s) const { return s==self_name; }
int DLLI dirty() const;
int DLLI getp() const { return p; }
Mm DLLI safebr(int i0) const;
inline m_type PDLLI getpr(m_type*) const { return (m_type*)pr; }
inline m_type PDLLI getpi(m_type*) const { return (m_type*)pi; }
inline uint8 PDLLI getpr(uint8*) const { return (uint8*)pr; }
inline uint8 PDLLI getpi(uint8*) const { return (uint8*)pi; }
inline Mm PDLLI getpr(Mm*) const { return (Mm*)pr; }
inline Mm PDLLI getpi(Mm*) const { return (Mm*)pi; }
inline m_type PDLLI getpr(m_type*,int i0) const { return i0-1+(m_type*)pr;
}
}
inline m_type PDLLI getpi(m_type*,int i0) const { return i0-1+(m_type*)pi;
}
inline uint8 PDLLI getpr(uint8*,int i0) const { return i0-1+(uint8*)pr;
}
inline uint8 PDLLI getpi(uint8*,int i0) const { return i0-1+(uint8*)pi;
}
inline Mm PDLLI getpr(Mm*,int i0) const { return i0-1+(Mm*)pr; }
getpr(Mm*,int i0) const { return i0-1+(Mm*)pr; }x_ab]
inline Mm PDLLI getpi(Mm*,int i0) const { return i0-1+(Mm*)pi; }
inline m_type PDLLI getpr(m_type*,int i0,int i1) const { return i0-1+(i1-1
)*dims[0]+(m_type*)pr; }
inline m_type PDLLI getpi(m_type*,int i0,int i1) const { return i0-1+(i1-1
)*dims[0]+(m_type*)pi; }
inline uint8 PDLLI getpr(uint8*,int i0,int i1) const { return i0-1+(i1-1
)*dims[0]+(uint8*)pr; }
inline uint8 PDLLI getpi(uint8*,int i0,int i1) const { return i0-1+(i1-1
)*dims[0]+(uint8*)pi; }
inline Mm PDLLI getpr(Mm*,int i0,int i1) const { return i0-1+(i1-1
)*dims[0]+(Mm*)pr; }
inline Mm PDLLI getpi(Mm*,int i0,int i1) const { return i0-1+(i1-1
)*dims[0]+(Mm*)pi; }
m_type PDLLI addr() const;
m_type PDLLI addr(int i0) const;
inline Mm PDLLI getpr(Mm*,int i0) const { return i0-1+(Mm*)pr; }x_ab]
m_type PDLLI addr(int i0,int i1) const;
m_type PDLLI addi() const;
m_type PDLLI addi(int i0) const;
m_type PDLLI addi(int i0,int i1) const;
inline int PDLLI getindex() const { return index; }
inline int RDLLI getnnz() const { return (int&)nnz; }
m_type RDLLI r() const;
m_type RDLLI r(double i0) const;
m_type RDLLI r(double i0, double i1) const;
m_type RDLLI r(double i0, double i1, double i2) const;
m_type RDLLI i() const;
m_type RDLLI i(double i0) const;
m_type RDLLI i(double i0, double i1) const;
m_type RDLLI i(double i0, double i1, double i2) const;
uint8 RDLLI ur(int i0) const;
uint8 RDLLI ur(int i0, int i1) const;
Mm RDLLI mr(int i0) const;
Mm RDLLI mr(int i0, int i1) const;
Mr DLLI member(const char* field) const { return Mr(*this, field); }
Mr DLLI operator ()(cMm i0) const { return Mr(Mr_idx_paren, *this, i0); }
Mr DLLI operator ()(cMm i0, cMm i1) const { return Mr(Mr_idx_paren, *this,
inline Mm PDLLI getpr(Mm*,int i0) const { return i0-1+(Mm*)pr; }x_ab]
i0, i1); }
i0, i1); }
Mr DLLI operator ()(cMm i0, cMm i1, cMm i2) const { return Mr(Mr_idx_paren , *this, i0, i1, i2); }
Mr DLLI operator ()(cMm i0, cMm i1, cMm i2, cMm i3) const { return Mr(Mr_i dx_paren, *this, i0, i1, i2, i3); }
Mr DLLI br(cMm i0) const { return Mr(Mr_idx_br,*this, i0); }
Mr DLLI br(cMm i0, cMm i1) const { return Mr(Mr_idx_br,*this, i0, i1); }
Mr DLLI br(cMm i0, cMm i1, cMm i2) const { return Mr(Mr_idx_br,*this, i0, i1, i2); }
Mr DLLI br(cMm i0, cMm i1, cMm i2, cMm i3) const { return Mr(Mr_idx_br,*th
is, i0, i1, i2, i3); }
m_type& fastindex(double i0) const { return pr[int(i0)-1]; }
m_type& fastindex(double i0, double i1) const { return pr[int(i0)-1+(int(i
1)-1)*dims[0]]; }
void DLLI vwcopy1(cMm src, cMm v);
void DLLI vwcopy2(cMm src, cMm v, cMm w);
void DLLI vwcopyn(cMr src, cMm rhs);
const { return i0-1+(Mm*)pr; }x_ab]
void DLLI vwcopy0(cMr src);
int DLLI findfield(const char* field, int err) const;
const char PDLLI getfield(int i) const;
int DLLI addfield(const char* field,int quick);
int DLLI rmfield(const char* field);
void DLLI extend_nfields(int new_nfields);
int DLLI getclassid() const { return classid; }
void DLLI setclassid(int new_classid) { classid=new_classid; }
void DLLI reshape(const int m, const int n);
void DLLI reshape(const int new_ndims, const int new_dims[max_ndims]);
void DLLI print(int full) const;
void DLLI warn_uninit() const;
void DLLI resparse();
int DLLI search(int idx) const;
void DLLI sort();
void DLLI extend_nnz(int new_nnz);
}; // M
Mc DLLI BR(cMm src);
Mc DLLI CL(cMm src);
m_type DLLI scalar(m_type x);
m_type DLLI scalar(cMm x);
Mm x);c, cMm rhs);) const { return i0-1+(Mm*)pr; }x_ab]
Mm DLLI switchinit(cMm x);
****************************************************************************
>>> 系统常数
**************************************************************************
extern DLLW double DLLI nargin_val;
extern DLLW double DLLI nargout_val;
extern DLLW double DLLI nargout_val;
extern DLLW int DLLI nargin_set;
extern DLLW int DLLI nargout_set;
extern DLLW Mm DLLI TICTOC;
extern DLLW Mm DLLI ans;
extern DLLW Mm DLLI i;
extern DLLW Mm DLLI j;
extern DLLW Mm DLLI pi;
extern DLLW Mm DLLI Inf;
extern DLLW Mm DLLI NaN;
extern DLLW Mm DLLI eps;
extern DLLW Mm DLLI x_M;
extern DLLW Mm DLLI semi;
extern DLLW Mm DLLI c_p;
extern DLLW Mm DLLI nop_M;
extern DLLW Mm DLLI nop_M;, cMm rhs);) const { return i0-1+(Mm*)pr; }x_ab]
extern DLLW Mm DLLI zero_M;
extern DLLW Mm DLLI one_M;
extern DLLW Mm DLLI l_M;
extern DLLW Mm DLLI page_screen_output;
extern DLLW Mm DLLI implicit_str_to_num_ok;
extern DLLW Mm DLLI empty_list_elements_ok;
extern DLLW Mm DLLI switchvar;
****************************************************************************
>>> 特殊函数
**************************************************************************
Mm DLLI airy(cMm z);
Mm DLLI airy(cMm k, cMm z);
Mm DLLI airy(cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI airy(cMm k, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI bessel(cMm nu);
Mm DLLI bessel(cMm nu, cMm z);
Mm DLLI bessel(cMm nu, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI bessela(cMm nu);
Mm DLLI bessela(cMm nu, cMm z);
rhs);) const { return i0-1+(Mm*)pr; }x_ab]
Mm DLLI bessela(cMm nu, cMm z, i_o_t, Mm& J, Mm& ndigits);
Mm DLLI besselh(cMm nu);
Mm DLLI besselh(cMm nu, cMm z);
Mm DLLI besselh(cMm nu, cMm k, cMm z);
Mm DLLI besselh(cMm nu, cMm k, cMm z, cMm scale1);
Mm DLLI besselh(cMm nu, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI besselh(cMm nu, cMm k, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI besselh(cMm nu, cMm k, cMm z, cMm scale1, i_o_t, Mm& w, Mm& err);
Mm DLLI besseli(cMm nu);
Mm DLLI besseli(cMm nu, cMm z);
Mm DLLI besseli(cMm nu, cMm z);
Mm DLLI besseli(cMm nu, cMm z, cMm scale1);
Mm DLLI besseli(cMm nu, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI besseli(cMm nu, cMm z, cMm scale1, i_o_t, Mm& w, Mm& err);
Mm DLLI besselj(cMm nu);
Mm DLLI besselj(cMm nu, cMm z);
Mm DLLI besselj(cMm nu, cMm z, cMm scale1);
Mm DLLI besselj(cMm nu, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI besselj(cMm nu, cMm z, cMm scale1, i_o_t, Mm& w, Mm& err);
Mm DLLI besselk(cMm nu);
Mm DLLI besselk(cMm nu, cMm z);
Mm DLLI besselk(cMm nu, cMm z, cMm scale1);
Mm DLLI besselk(cMm nu, cMm z, cMm scale1); const { return i0-1+(Mm*)pr;
}x_ab]
Mm DLLI besselk(cMm nu, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI besselk(cMm nu, cMm z, cMm scale1, i_o_t, Mm& w, Mm& err);
Mm DLLI bessely(cMm nu);
Mm DLLI bessely(cMm nu, cMm z);
Mm DLLI bessely(cMm nu, cMm z, cMm scale1);
Mm DLLI bessely(cMm nu, cMm z, i_o_t, Mm& w, Mm& err);
Mm DLLI bessely(cMm nu, cMm z, cMm scale1, i_o_t, Mm& w, Mm& err);
****************************************************************************
>>> 特殊数据类型定义
**************************************************************************
Mm DLLI cell(cMm x);
Mm DLLI cell(cMm x, cMm y);
Mm DLLI cell(cMm x, cMm y, cMm o);
Mm DLLI cell(cMm x, cMm y, cMm o, cMm p);
Mm DLLI cells(cMm x);
Mm DLLI cells(cMm x, cMm y);
Mm DLLI cellstr(cMm x);
Mm DLLI cell_from_array(int n, const Mm* x[]);
Mm DLLI cell2struct(cMm x);
z, cMm scale1); const { return i0-1+(Mm*)pr; }x_ab]
Mm DLLI cell2struct(cMm x, cMm f);
Mm DLLI cell2struct(cMm x, cMm f, cMm dim1);
int DLLI iscellstr(cMm x);
int DLLI isa(cMm x);
int DLLI isa(cMm x, cMm cls);
Mm DLLI mclass(cMm x);
Mm DLLI mclass(cMm x, cMm class_name);
Mm DLLI mchar(cMm varargin);
Mm DLLI mdouble(cMm x);
Mm DLLI mlogical(cMm x);
Mm DLLI muint8(cMm x);
Mm DLLI muint16(cMm x);
Mm DLLI fieldnames(cMm s);
Mm DLLI fieldnames(cMm s);
Mm DLLI isfield(cMm s);
Mm DLLI isfield(cMm s, cMm f);
Mm DLLI getfield(cMm s);
Mm DLLI getfield(cMm s, cMm varargin);
Mm DLLI mstruct(cMm varargin);
Mm DLLI setfield(cMm s);
Mm DLLI setfield(cMm s, cMm field);
Mm DLLI setfield(cMm s, cMm field, cMm v);
Mm DLLI setfield(cMm s, cMm field, cMm v);; const { return i0-1+(Mm*)pr;
}x_ab]
Mm DLLI struct2cell(cMm s);
Mm DLLI rmfield(cMm s);
Mm DLLI rmfield(cMm s, cMm fields);
****************************************************************************
>>> 异常处理函数
****************************************************************************
**************************************************************************
>>> 矩阵生成函数
****************************************************************************
Mm DLLI cauchy(Mm x);
Mm DLLX cauchy(Mm x, Mm y);
Mm DLLI compan(cMm x);
Mm DLLI gallery(Mm n);
Mm DLLI hadamard(Mm n);
Mm DLLI hankel(Mm c);
Mm DLLI hankel(Mm c, Mm r);
Mm DLLI hilb(Mm n);
Mm DLLI invhilb(Mm n);
cMm field, cMm v);; const { return i0-1+(Mm*)pr; }x_ab]
Mm DLLI magic(Mm n);
Mm DLLI pascalM(cMm n);
Mm DLLI pascalM(Mm n, Mm r);
Mm DLLI rosser();
Mm DLLI toeplitz(Mm c);
Mm DLLI toeplitz(Mm c, Mm r);
Mm DLLI vander(Mm x);
Mm DLLI wilkinson(cMm n);
****************************************************************************
*
>>> 操作系统资源函数
****************************************************************************
*******
Mm DLLI cd();
Mm DLLI cd();
Mm DLLI cd(cMm dir1);
Mm DLLI chdir(cMm dir1);
Mm DLLI copyfile(cMm src);
Mm DLLI copyfile(cMm src, cMm dest);
Mm DLLI deleteM(cMm filename);
Mm DLLI deleteM(cMm filename);eld, cMm v);; const { return i0-1+(Mm*)pr;
}x_ab]
Mm DLLI dos(cMm command);
Mm DLLI dos(cMm command, i_o_t, Mm& status, Mm& sout);
Mm DLLI dos(cMm command, cMm echo);
Mm DLLI dos(cMm command, cMm echo, i_o_t, Mm& status, Mm& sout);
Mm DLLI fclose(cMm fid);
Mm DLLI feof(cMm fid);
Mm DLLI ferror(cMm fid);
Mm DLLI ferror(cMm fid, cMm clear);
Mm DLLI ferror(cMm fid, cMm clear, i_o_t, Mm& msg, Mm& errnum);
Mm DLLI ferror(cMm fid, i_o_t, Mm& msg, Mm& errnum);
Mm DLLI fflush(cMm fid);
Mm DLLI fgetl(cMm fid);
Mm DLLI fgets(cMm fid);
Mm DLLI fgets(cMm fid, cMm nchar);
Mm DLLI filesep();
Mm DLLI fopen(cMm filename);
Mm DLLI fopen(cMm filename, cMm permission);
Mm DLLI fopen(cMm filename, cMm permission, cMm machine);
Mm DLLI fopen(cMm filename, cMm permission, cMm machine, i_o_t, Mm& fid,
Mm&
msg);
msg);I deleteM(cMm filename);eld, cMm v);; const { return i0-1+(Mm*)pr;
}x_ab]
Mm DLLI fopen(cMm filename, cMm permission, i_o_t, Mm& fid, Mm& msg);
Mm DLLI fopen(cMm filename, i_o_t, Mm& fid, Mm& msg);
Mm DLLI fopen(cMm fid, i_o_t, Mm& filename, Mm& permission, Mm& machine);
Mm DLLI fprintf(cMm fid, cMm format1);
Mm DLLI fprintf(cMm fid, cMm format1, cMm varargin);
Mm DLLI fprintf(cMm x);
Mm DLLI fread(cMm fid);
Mm DLLI fread(cMm fid, cMm size);
Mm DLLI fread(cMm fid, cMm size, cMm precision);
Mm DLLI fread(cMm fid, cMm size, cMm precision, cMm skip);
Mm DLLI fread(cMm fid, cMm size, cMm precision, cMm skip, c