root/applications/dual/SIDP/SIDPS/motor_sidps/add_H_tilde0.asv
@
1249
Revision 1249, 507 bytes (checked in by zimamiro, 14 years ago) |
---|
Rev | Line | |
---|---|---|
[1249] | 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.