No BSD License  

Highlights from
Neurocal

image thumbnail
from Neurocal by Zeng Lertmanorat
Simulation describing the electrical activity of nerve cell (neuron) by solving cable equation

create_dummyvar
function create_dummyvar
global zeng2 
%zeng2.dummyvar is used during the calculation and will be deleted when the
%calculation is done.
%
%zeng2.var is used for plotting after the calculation is done.
%--------------------------------
zeng2.dummyvar=cell(1,length(zeng2.var));
for tempzeng=1:length(zeng2.varlist)
    feval('global',zeng2.varlist{tempzeng})
end
%-----------------------------------------
zeng2.dummyvar=[];
for i=1:length(zeng2.var)
    %-------------------------------------------------------------------------------    
    eval(['zeng2.dummyvar{i}.name     =' zeng2.var{i}.name '.name;'])                  
    eval(['zeng2.dummyvar{i}.varnum   =' zeng2.var{i}.name '.varnum   ;'])                  
    eval(['zeng2.dummyvar{i}.nseg     =' zeng2.var{i}.name '.nseg     ;'])
    eval(['zeng2.dummyvar{i}.dia      =' zeng2.var{i}.name '.dia      ;'])
    eval(['zeng2.dummyvar{i}.da_D     =' zeng2.var{i}.name '.da_D     ;'])
    eval(['zeng2.dummyvar{i}.dn_D     =' zeng2.var{i}.name '.dn_D;'])
    eval(['zeng2.dummyvar{i}.Linter_D =' zeng2.var{i}.name '.Linter_D;'])
    eval(['zeng2.dummyvar{i}.Lmode    =' zeng2.var{i}.name '.Lmode    ;'])
    if zeng2.dummyvar{i}.Lmode==2 %L=nseg.D.(Linternodal/D)
        eval([zeng2.var{i}.name '.L=zeng2.dummyvar{i}.Linter_D*zeng2.dummyvar{i}.dia*zeng2.dummyvar{i}.nseg;'])
    end
    eval(['zeng2.dummyvar{i}.L        =' zeng2.var{i}.name '.L;'])
    eval(['zeng2.dummyvar{i}.lnodal   =' zeng2.var{i}.name '.lnodal   ;'])
    eval(['zeng2.dummyvar{i}.cm       =' zeng2.var{i}.name '.cm       ;'])
    eval(['zeng2.dummyvar{i}.ra       =' zeng2.var{i}.name '.ra       ;'])
    eval(['zeng2.dummyvar{i}.rm       =' zeng2.var{i}.name '.rm       ;'])
    eval(['zeng2.dummyvar{i}.vini    =' zeng2.var{i}.name '.vini    ;'])
    eval(['zeng2.dummyvar{i}.model    =' zeng2.var{i}.name '.model    ;'])
    eval(['zeng2.dummyvar{i}.vestim    =' zeng2.var{i}.name '.vestim       ;'])
    eval(['zeng2.dummyvar{i}.xyz      =' zeng2.var{i}.name '.xyz      ;'])
    eval(['zeng2.dummyvar{i}.xyzi=' zeng2.var{i}.name '.xyzi;'])
    eval(['zeng2.dummyvar{i}.xyzc=' zeng2.var{i}.name '.xyzc;'])
    %-------------------------------------------------------------------------------    
    %useful for plotting
    zeng2.var{i}.nseg  =   zeng2.dummyvar{i}.nseg;
    zeng2.var{i}.L     =   zeng2.dummyvar{i}.L;
    %-------------------------------------------------------------------------------    
end

Contact us at files@mathworks.com