clclass.m

来自「电力系统分析计算程序」· M 代码 · 共 33 行

function a = CLclass(varargin)
% constructor of the class Cluster
% == Cluster ==

global Settings

switch nargin
 case 0
  a.con = [];
  a.n = 0;
  a.q = [];
  a.syn = [];
  a.exc = [];
  a.svc = [];
  a.vref = [];
  a.cac  = [];
  a.Vs = [];
  a.dVsdQ = [];
  a.u = [];
  a.store = [];
  a.ncol = 10;
  a.format = ['%4d %4d %4d ',repmat('%8.4g ',1,6),'%2u'];
  if Settings.matlab, a = class(a,'CLclass'); end
 case 1
  if isa(varargin{1},'CLclass')
    a = varargin{1};
  else
    error('Wrong argument type')
  end
 otherwise
  error('Wrong Number of input arguments')
end