Index: mttroot/mtt/bin/trans/mtt_header
==================================================================
--- mttroot/mtt/bin/trans/mtt_header
+++ mttroot/mtt/bin/trans/mtt_header
@@ -10,10 +10,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.17  2000/12/01 20:55:01  peterg
+## Added Geraint's fix for zeroing matrices
+##
 ## Revision 1.16  2000/12/01 17:56:30  peterg
 ## Removed spurious  echo '## Set matrices to zero' - thanks Geraint
 ##
 ## Revision 1.15  2000/11/29 21:06:16  peterg
 ## Removed Npar creation - not needed??
@@ -292,13 +295,15 @@
 function declare_dummies(){
 # Get the dummies
 dummies="mtt_tmp"
 rm -f mtt_dummies
 for dummy in $dummies; do
-    awk '{
-     if (match($1,dummy)==1) print $1
-     }' dummy=$dummy < ${fun_name}.m >> mtt_dummies
+    grep "${dummy}[0-9]* " < ${fun_name}.m |\
+    awk '{ 
+          # if (match(dummy,$1)==1)
+             print $1
+         }' dummy=$dummy | sort -u >> mtt_dummies
 done
 
 dummy_list=`sort -u mtt_dummies`
 
 # Comments
@@ -334,10 +339,16 @@
 cat <<EOF
 
 $Lc Parameters $Rc
 EOF
 sympar2par_txt2m ${system} ""  "$constant_declaration" "$minusone"
+cat <<EOF
+
+$Lc Switches $Rc
+EOF
+strip_comments <${system}_logic.txt | awk '{printf("  int %s = 0;\n", tolower($1))}' 
+
 fi
 
 # States
 if [ "$states" = "yes" ]; then
 cat <<EOF