checkprversion.m

来自「数据挖掘的工具箱,最新版的,希望对做这方面研究的人有用」· M 代码 · 共 32 行

function out = checkprversion;
%out = checkprversion;
%
% Check the version of Prtools, and see if it is good enough for
% dd_tools.

out = 1; %everything OK...
minversion = 4.0;
% Generate a newline:
if strcmp(computer,'MAC2')
   newln = char(13);
else
   newln = char(10);
end
% For fun, some color:
if 1==0
	clr_on = [char(27) '[1;31m'];
	clr_off = [char(27) '[0;0m'];
else
	clr_on = [];
	clr_off = [];
end
% And do the check:
if prversion<minversion
	str = sprintf('This version of Dd_tools requires >= Prtools %3.1f!',...
	       minversion);
	error([clr_on newln '---- ' str ' ----' clr_off]);
	out = 0;
end

return