Index: mttroot/mtt/bin/trans/m/write_abg.m
==================================================================
--- mttroot/mtt/bin/trans/m/write_abg.m
+++ mttroot/mtt/bin/trans/m/write_abg.m
@@ -3,10 +3,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.9  2001/04/15 21:15:41  geraint
+## Added interface definition rep: _ICD.(txt|c|cc|m).
+##
 ## Revision 1.8  1999/10/18 22:41:41  peterg
 ## Corrected vector junction expansion
 ##
 ## Revision 1.7  1999/10/18 05:16:51  peterg
 ## Now vectorises 0 and 1 junctions !!
@@ -51,11 +54,11 @@
   fprintf(fid,"# The file is in Octave format\n");
 
   fprintf(fid,"\n# Subsystems and Ports\n");
   i_port=0; SubsystemList = ""; PortList ="";
   for i=1:N
-    eval(["[comp_type, name, cr, arg, repetitions] = ", system_name, "_cmp(i);"]);
+    eval(["[comp_type, name, cr, args, repetitions] = ", system_name, "_cmp(i);"]);
     c = nozeros(connections(i,:));# Connections to this component
     m = length(c);		# Number of connections
 
     ## Vectorise junctions?
     n_bonds = n_vector_bonds(i);
@@ -78,11 +81,11 @@
 	
 	SubsystemList = [SubsystemList; new_name];
 	fprintf(fid,"\n# Component %s\n", new_name);
 	fprintf(fid,Sformat,system_name,new_name,"type",comp_type);
 	fprintf(fid,Sformat,system_name,new_name,"cr",cr);
-	fprintf(fid,Sformat,system_name,new_name,"arg",arg);
+	fprintf(fid,Sformat,system_name,new_name,"arg",args);
 	fprintf(fid,Iformat,system_name,new_name,"repetitions",repetitions);
 	fprintf(fid,Iformat,system_name,new_name,"status",-1);
 
 	##Connections
 	fprintf(fid,Cformat,system_name,new_name);
@@ -125,11 +128,11 @@
 	PortList = [PortList; name_i]; # Update port list
 	
 	fprintf(fid,"\n# Port %s\n", name_i); 
 	fprintf(fid,PSformat,system_name,name_i,"type",comp_type);
 	fprintf(fid,PSformat,system_name,name_i,"cr",cr);
-	fprintf(fid,PSformat,system_name,name_i,"arg",arg);
+	fprintf(fid,PSformat,system_name,name_i,"arg",args);
 	fprintf(fid,PIformat,system_name,name_i,"repetitions",repetitions);
 	fprintf(fid,PIformat,system_name,name_i,"status",-1);
 	
 	fprintf(fid,PCformat,system_name,name_i);
       	fprintf(fid,"%i ", c(i_port));