ADDED   mttroot/mtt/bin/trans/abg2sub_fig2sh
Index: mttroot/mtt/bin/trans/abg2sub_fig2sh
==================================================================
--- /dev/null
+++ mttroot/mtt/bin/trans/abg2sub_fig2sh
@@ -0,0 +1,73 @@
+#! /bin/sh
+
+     ###################################### 
+     ##### Model Transformation Tools #####
+     ######################################
+
+# Bourne shell script: abg2sub_m2sh
+  ###################################### 
+  ##### Model Transformation Tools #####
+  ######################################
+  
+  ###############################################################
+  ## Version control history
+  ###############################################################
+  ## $Id$
+  ## $Log$
+  ##
+  ###############################################################
+
+# Copyright (C) 1996--2001 by Peter J. Gawthrop
+
+if [ -f "$1_sub.sh" ]; then
+    echo Using "$1_sub.sh"
+    exit
+else
+    #Inform user
+    echo Creating $1_sub.sh    
+fi
+
+
+echo '# Commands to generate subsystem representations'>  $1_sub.sh
+echo "# File $1_sub.sh"			>> $1_sub.sh
+echo "# Generated by MTT on `date`."	>> $1_sub.sh
+echo					>> $1_sub.sh
+
+# Get a list of all components for the _abg file
+cat $1_abg.fig |\
+grep ':' |\
+awk '{if ($1==4) split($14,a,":"); print a[1]}'  |\
+sort -u > mtt_tmp1
+
+# Remove all components starting with 0 or 1
+grep -v '^[01]' < mtt_tmp1 > mtt_tmp4
+
+# Get a list of all standard simple components
+ls $MTT_LIB/comp/simple |\
+  awk '/_cause.m/{split($1,a,"_");print(a[1])}'  >mtt_tmp2
+
+# Get a list of all standard compound components
+#ls $MTTPATH/comp/compound |\
+#  awk '/_abg.m/{split($1,a,"_");print(a[1])}'  >> mtt_tmp2
+
+# Sorted combined list
+cat mtt_tmp2 | \
+  sed  's/^zero$/0/' |\
+  sed  's/^one$/1/' |\
+  sort -u >mtt_tmp3
+
+# Print the non-standard components
+comm mtt_tmp4 mtt_tmp3 |\
+  awk 'BEGIN{FS="\t"}{if (length($1)>0) print "$1" $1 "$2"}' \
+  >>$1_sub.sh
+
+# Clean up mtt_tmp files
+#rm -f mtt_tmp?
+
+
+
+
+
+
+
+