Index: mttroot/mtt/bin/trans/abg2lbl_fig2txt
==================================================================
--- mttroot/mtt/bin/trans/abg2lbl_fig2txt
+++ mttroot/mtt/bin/trans/abg2lbl_fig2txt
@@ -11,10 +11,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.10  2000/01/26 10:11:10  peterg
+## Added I component
+##
 ## Revision 1.9  1999/11/10 00:47:08  peterg
 ## Replaced ifs by a table of cr/arg information
 ##
 ## Revision 1.8  1999/11/09 22:32:41  peterg
 ## Under RCS ready for using arrays to contaain defaults.
@@ -100,10 +103,11 @@
 
 #Write out the outline lbl file
 grep -v  '\[[0-9]*\]'  $1_unique_raw_list | \
 awk --field-separator ':' '
  BEGIN {
+    OldComponent="None";
  }
  { 
   Component = $1;
   ##Aliases
   if (Component == "SS") {
@@ -117,26 +121,31 @@
       s_arg = sprintf(";%s",s_arg);
       Component = substr(Component,2);
     }
  }
 
-
-
     ## Table of components
     cr["SS"] = "SS";  arg["SS"] = "external,external";
 
-    cr["Se"] = "SS";  arg["Se"] = "external";
-    cr["Sf"] = "SS";  arg["Sf"] = "external";
+    cr["Se"] = "SS";  arg["Se"] = sprintf("external%s", s_arg);
+    cr["Sf"] = "SS";  arg["Sf"] = sprintf("external%s", s_arg);
 
     cr["De"] = "SS";  arg["De"] = "external";
     cr["Df"] = "SS";  arg["Df"] = "external";
 
     cr["R"] = "lin";  arg["R"]  = sprintf("flow,%s%s", $2, s_arg);
     cr["C"] = "lin";  arg["C"]  = sprintf("effort,%s%s", $2, s_arg);
     cr["I"] = "lin";  arg["I"]  = sprintf("flow,%s%s", $2, s_arg);
+
+    cr["CS"] = "lin";  arg["CS"]  = sprintf("effort,%s;x_0%s", $2, s_arg);
+    cr["IS"] = "lin";  arg["IS"]  = sprintf("flow,%s;x_0%s", $2, s_arg);
+
     cr["TF"] = "lin";  arg["TF"]  = sprintf("flow,%s%s", $2, s_arg);
     cr["GY"] = "lin";  arg["GY"]  = sprintf("flow,%s%s", $2, s_arg);
+
+    cr["AE"] = "lin";  arg["AE"]  = sprintf("%s%s", $2, s_arg);
+    cr["AF"] = "lin";  arg["AF"]  = sprintf("%s%s", $2, s_arg);
 
   ## Heading
   if (Component !~ OldComponent) print "\n% Component type", Component
 
   ## Component