255 |
% modifications make the output field smaller, let us see, if it is |
% modifications make the output field smaller, let us see, if it is |
256 |
% robust |
% robust |
257 |
if (firstiter) |
if (firstiter) |
258 |
S.i_first.(cvar) = i0; |
S.attributes.i_first.(cvar) = i0; |
259 |
S.j_first.(cvar) = j0; |
S.attributes.j_first.(cvar) = j0; |
260 |
end |
end |
261 |
i0 = i0 - S.i_first.(cvar); |
i0 = i0 - S.attributes.i_first.(cvar); |
262 |
j0 = j0 - S.j_first.(cvar); |
j0 = j0 - S.attributes.j_first.(cvar); |
263 |
% end code by Bruno Deremble |
% end code by Bruno Deremble |
264 |
|
|
265 |
Sstr = ''; |
Sstr = ''; |
430 |
% modifications make the output field smaller, let us see, if it is |
% modifications make the output field smaller, let us see, if it is |
431 |
% robust |
% robust |
432 |
if (firstiter) |
if (firstiter) |
433 |
S.i_first.(cvar) = i0; |
S.attributes.i_first.(cvar) = i0; |
434 |
S.j_first.(cvar) = j0; |
S.attributes.j_first.(cvar) = j0; |
435 |
end |
end |
436 |
i0 = i0 - S.i_first.(cvar); |
i0 = i0 - S.attributes.i_first.(cvar); |
437 |
j0 = j0 - S.j_first.(cvar); |
j0 = j0 - S.attributes.j_first.(cvar); |
438 |
% end code by Bruno Deremble |
% end code by Bruno Deremble |
439 |
|
|
440 |
Sstr = ''; |
Sstr = ''; |