Index: mttroot/mtt/bin/trans/m/mtt_component_eqn.m
==================================================================
--- mttroot/mtt/bin/trans/m/mtt_component_eqn.m
+++ mttroot/mtt/bin/trans/m/mtt_component_eqn.m
@@ -23,10 +23,11 @@
   [Name,name] = mtt_subname(fullname); # Split fullname
 
   SD = "__";			# Subsystem delimiter
   CD = "\n%%";			# Comment delimiter
   arg_default = "1";		# Default aliased arg
+  cr_default = "lin";		# Default aliased arg
 
   DEBUG = 0;
 
   if DEBUG
     disp("=======================================");
@@ -49,13 +50,18 @@
     endif
   endif
 
 
   if length(name)>0 		# Alias
+    ##Alias arguments
     eval(sprintf("ARG=cbg.subsystems.%s.arg;", name)); # Arguments
     ARG = mtt_alias (Name,ARG,arg_default); # Alias them
     eval(sprintf("cbg.subsystems.%s.arg=ARG;", name)); # and copy
+    ## Alias CRs
+    eval(sprintf("CR=cbg.subsystems.%s.cr;", name)); # CRs
+    CR = mtt_alias (Name,CR,cr_default); # Alias them
+    eval(sprintf("cbg.subsystems.%s.cr=CR;", name)); # and copy
   else			  # Call to a subsystem (represented by name="")
     if !struct_contains(cbg,"portlist")
       N_ports = 0;
     else
       [N_ports,M_ports] = size(cbg.portlist);