Location: cellLib @ 701e8cebe4ae / Scripts / getPara.m

Author:
WeiweiAi <wai484@aucklanduni.ac.nz>
Date:
2022-05-17 17:36:49+12:00
Desc:
Make a correction
Permanent Source URI:
https://models.cellml.org/workspace/6bc/rawfile/701e8cebe4ae7dde52fcefc1ea27c2fb6b39fdee/Scripts/getPara.m

function comp=getPara(comp,idx)
vars=extractfield(comp,'vars');
all_vars=[];
for i=1: length(vars)
    all_vars=[all_vars;vars{1,i}];
end
% get all non-repetitive parameters
indexp=all_vars(:,idx.vctg)=="para";
pvars=all_vars(indexp,:);
[~,ip,~]=unique(pvars(:,idx.var)','stable');
comp_para.name='Para';
comp_para.children='';
vars_para=pvars(ip,:);
values=vars_para(:,idx.val);
vars_para(:,idx.pub)='out';
vars_para(:,idx.priv)='none';
vars_para(:,idx.init)=values;
comp_para.vars=vars_para;
comp=[comp,comp_para];
end