gams.m

来自「用于电力系统的一个很好的分析软件」· M 代码 · 共 28 行

function [nH,Ch] = gams(a,type)

nH = '';
Ch = struct('val',[],'labels',[],'name','');

switch type
 case 2
  nH = ['H',num2str(a.len)];
 case 4
  nH = 'H1';
end

if type == 2
  Ch.val = zeros(a.len+1,1);
  Ch.val = [0;a.day(:,a.d)]'*a.week(a.w)*a.year(a.y)/1e6;
  Ch.val(1) = Ch.val(2);
  Ch.labels = cell(1,a.len+1);
  for idx = 1:a.len+1
    Ch.labels{idx} = ['H',num2str(idx-1)];
  end
  Ch.name = 'Ch';
elseif type == 4
  Ch.val = [1,1];
  Ch.name = 'Ch';
  Ch.labels = {'H0','H1'};
end