root/applications/dual/SIDP/SIDPS/motor_sidps/add_H_tilde0.asv
@
1296
Revision 1249, 507 bytes (checked in by zimamiro, 14 years ago) |
---|
Line | |
---|---|
1 | function H0=add_H_tilde0(regulator_parameters,H_tilde) |
2 | index=decompose_index(k,regulator_parameters.n_grid,dim); |
3 | for l=1:dim |
4 | H_tilde0(l)=H_tilde(l,index(l)); |
5 | end |
6 | |
7 | H0=zeros(size(regulator_parameters.H_tilde_on)); |
8 | a=0; |
9 | for i=1:(size(regulator_parameters.H_tilde_on,1)) |
10 | for j=1:(size(regulator_parameters.H_tilde_on,2)) |
11 | if (regulator_parameters.H_tilde_on(i,j)) |
12 | a=a+1; |
13 | H0(i,j)=H_tilde(a); |
14 | end |
15 | end |
16 | end |
17 | |
18 | end |
Note: See TracBrowser
for help on using the browser.