Index: mttroot/mtt/bin/trans/m/getdynamic.m
==================================================================
--- mttroot/mtt/bin/trans/m/getdynamic.m
+++ mttroot/mtt/bin/trans/m/getdynamic.m
@@ -4,15 +4,16 @@
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% Revision 1.1  1996/08/16 12:50:41  peter
+% %% Initial revision
+% %%
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 
 index=0; prefered=0;
-s = status'
 n_components = length(status);
 
 for i = 1:n_components
   if status(i)==-1 % Undercausal
     eval([ '[comp_type,name,cr,arg] = ', system_type, '_cmp(i);' ]); 
@@ -26,6 +27,5 @@
       prefered=1;
       break;
     end;
   end;
 end;
-index