li2.txt

这是机械工业张德丰《MATLAB与外部程序接口编程》随书源码

/* mrankp.c */
/*
* 该程序说明了使用MATLAB数学库的“Posix.C”语言主程序调用mlfMrank
* 
* mlfMrank由mcc编译mrank.m而得到。
*
*/
#include <stdio.h>
#include <math.h>
#include "matlab.h"
/* mlfMrank的函数原型 */
extren mxArray *mlfMrank( mxArray *);
main(int argc,char *argv)
{
mxArray *N; //定义一个mxArray指针，用来保存n值。
mxArray *R; //定义一个mxArray指针，用来保存计算结果
int n;  //命令行的整数参数
//获取命令行参数
if (argc>=2)
{
	n=atoi(argv[1]);
}
else
{
	n=12;
}
//初始化M-函数库
PkgInitialize();
//生成一个1×1阶阵列，用来保存n值
N=mlfscalar(n);
//调用由编译mrank.m而得到的mlfMrank函数，并将返回值R
R=mlfMrank（N）；
//打印结果
mlfPrintMatrix(R)；
//释放计算过程中分配的矩阵变量
mxDestroyArray(N);
mxDestroyArray(R)；
//关闭M-函数库
PkgTerminate();
}