ADDED   mttroot/mtt/bin/trans/makesspar
Index: mttroot/mtt/bin/trans/makesspar
==================================================================
--- /dev/null
+++ mttroot/mtt/bin/trans/makesspar
@@ -0,0 +1,42 @@
+#!/bin/sh
+
+     ###################################### 
+     ##### Model Transformation Tools #####
+     ######################################
+
+# Bourne shell script: makesspar
+# Makes default sspar file: all states zero.
+
+# P.J.Gawthrop February 1998
+# Copyright (c) P.J.Gawthrop, 1998.
+
+###############################################################
+## Version control history
+###############################################################
+## $Id$
+## $Log$
+###############################################################
+
+
+#Inform user
+echo Creating $1_sspar.r
+
+echo "% Steady-state parameters for system $1 ($1_sspar.r)"> $1_sspar.r
+echo "% Generated by MTT on" `date`. >> $1_sspar.r                  	   
+cat $MTTPATH/trans/m/rcs_header.txt  >> $1_sspar.r
+echo "% Set all states to zero" >> $1_sspar.r                  	   
+
+$MATRIX  <<EOF #>> /dev/null
+
+fnum=fopen("$1_sspar.r","a");
+
+[nx,ny,nu,nz,nyz] = $1_def;
+
+for i = 1:nx
+  fprintf(fnum,"MTTX%i := 0;\n", i);
+end;
+   
+EOF
+
+ 
+echo "END;;" >> $1_sspar.r