set.m

来自「一些经典遗传算法问题的matlab程序调度问题分配问题等等」· M 代码 · 共 17 行

function g = set(ddv,varargin)
if nargin==1
  set(ddv.gen)
  fprintf('p_val\n')
else
  for k=1:2:nargin-1
    switch varargin{k}
     case 'p_val'
      ddv.ddv_val=varargin{k+1};
     otherwise
      ddv.gen=set(ddv.gen,varargin{k},varargin{k+1});
    end
  end
  g=ddv;
end