catalog.m

来自「一个利用元胞自动机进行生态仿真的matlab程序」· M 代码 · 共 26 行

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%  CATALOG: Execute specified procedure
%
%	Fist Coded			3  June		1998
%	Last Modefied		4  June		1998
%
%	Copyright (c)
%	T. Suzudo JAERI-CAIL
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%Read Rules
load D:\MATLAB7\work\ecody\rule2

% Loop
sym_code225(1) = [0];
jj = 1
for ii1=1024:2048-1
	if ~(mod(ii1,4)==3)
		auto = 1;
		sym_code225(2:12)=dec2bi(ii1);
		save D:\MATLAB7\work\ecody\rule2 tr_code225 tr_code229 otr_code225 otr_code229 sym_code225;
		runeco2;
		ent(jj,:) = [ii1 mu 1 hs ht];
		jj = jj+1
	end
end