0
|
1 |
%======================================================================
|
|
2 |
% M K S T R U C T . M
|
|
3 |
% doc: Wed Apr 19 12:33:01 2006
|
|
4 |
% dlm: Wed Apr 19 13:10:52 2006
|
|
5 |
% (c) 2006 A.M. Thurnherr
|
|
6 |
% uE-Info: 16 0 NIL 0 0 72 2 2 4 NIL ofnI
|
|
7 |
%======================================================================
|
|
8 |
%
|
|
9 |
% structify workspace
|
|
10 |
%
|
|
11 |
|
|
12 |
varlist=who;
|
|
13 |
|
|
14 |
for i=1:length(varlist)
|
|
15 |
eval(sprintf('struct.%s = %s; clear %s;',varlist{i},varlist{i},varlist{i}));
|
|
16 |
end
|
|
17 |
|
|
18 |
clear i;
|
|
19 |
clear varlist;
|