Index: mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_abg.fig
==================================================================
--- mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_abg.fig
+++ mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_abg.fig
@@ -6,82 +6,31 @@
 100.00
 Single
 -2
 1200 2
 2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 2475 1575 3825 1575 3600 1800
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 4275 1575 5625 1575 5400 1800
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 6075 1575 7425 1575 7200 1800
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 4050 3600 4050 4950 3825 4725
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 5850 3600 5850 4950 5625 4725
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 4050 6750 4050 5400 3825 5625
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 5850 6750 5850 5400 5625 5625
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 5872 1822 5872 3172 5647 2947
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 4050 1800 4050 3150 3825 2925
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 4050 8550 4050 7200 3825 7425
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
-	 3825 1350 3825 1800
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 4275 8775 5625 8775 5400 9000
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 2475 8775 3825 8775 3600 9000
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
-	 3825 8550 3825 9000
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 5850 8550 5850 7200 5625 7425
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
-	 3825 4950 3825 5400
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 3825 5175 2475 5175 2700 5400
-2 4 0 2 31 7 101 0 -1 0.000 0 0 7 0 0 5
-	 13050 9225 675 9225 675 1125 13050 1125 13050 9225
-2 1 0 2 0 7 50 0 -1 0.000 0 0 -1 0 0 3
-	 6075 1800 7425 3150 7200 3150
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 7875 1575 9225 1575 9000 1800
-2 1 0 2 0 7 50 0 -1 0.000 0 0 -1 0 0 4
-	 6075 8775 7650 8775 7650 3600 7875 3825
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 9450 1822 9450 3172 9225 2947
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 9450 3600 9450 4950 9225 4725
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
-	 9675 3150 9675 3600
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 9675 3375 11025 3375 10800 3600
-2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
-	 9225 5175 6075 5175 6300 5400
-4 2 4 100 0 18 18 0.0000 4 270 870 2430 1665 SS:[In]\001
-4 1 0 100 0 18 18 0.0000 4 195 150 4050 1665 0\001
-4 1 0 100 0 18 18 0.0000 4 195 150 5850 1665 1\001
-4 1 0 100 0 18 18 0.0000 4 210 375 4050 3510 AE\001
-4 1 0 100 0 18 18 0.0000 4 210 585 4950 5265 R:ss\001
-4 1 4 100 0 18 14 0.0000 4 210 270 4275 4905 [1]\001
-4 1 4 100 0 18 14 0.0000 4 210 270 4275 5580 [3]\001
-4 1 4 100 0 18 14 0.0000 4 210 270 6075 4905 [2]\001
-4 1 4 100 0 18 14 0.0000 4 210 270 6075 5580 [4]\001
-4 1 0 100 0 18 18 0.0000 4 210 375 5850 3510 AF\001
-4 1 0 100 0 18 18 0.0000 4 210 375 4095 7065 AE\001
-4 1 0 100 0 18 18 0.0000 4 210 375 5850 7065 AF\001
-4 2 4 100 0 18 18 0.0000 4 270 1020 2430 8865 SS:[sIn]\001
-4 1 0 100 0 18 18 0.0000 4 195 150 4050 8865 0\001
-4 1 0 100 0 18 18 0.0000 4 195 150 5850 8865 1\001
-4 2 4 100 0 18 18 0.0000 4 270 1275 2385 5265 SS:[sOut]\001
-4 0 4 100 0 18 14 0.0000 4 210 270 3870 5220 [6]\001
-4 2 4 100 0 18 14 0.0000 4 210 270 6030 5220 [5]\001
-4 1 0 100 0 18 18 0.0000 4 210 690 7650 3510 sR:sr\001
-4 1 0 100 0 18 18 0.0000 4 210 375 7650 1665 AF\001
-4 1 0 100 0 18 18 0.0000 4 210 720 9675 1665 RS:rs\001
-4 1 0 100 0 18 18 0.0000 4 195 150 9495 3465 0\001
-4 1 0 100 0 18 18 0.0000 4 210 375 9495 5265 AE\001
-4 0 4 100 0 18 18 0.0000 4 270 1125 11115 3465 SS:[Out]\001
-4 2 4 100 0 18 14 0.0000 4 210 1215 7515 3780 [sensitivity]\001
-4 0 4 100 0 18 14 0.0000 4 210 780 7650 3105 [actual]\001
+	 2700 675 4050 675 3825 900
+2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
+	 2700 1350 4050 1350 3825 1575
+2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
+	 4050 1125 4050 1575
+2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
+	 4050 450 4050 900
+2 4 0 2 31 7 101 0 -1 0.000 0 0 7 0 0 5
+	 9900 1800 1350 1800 1350 225 9900 225 9900 1800
+2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
+	 4725 675 6075 675 5850 900
+2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 3
+	 4725 1350 6075 1350 5850 1575
+2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
+	 4725 1125 4725 1575
+2 1 0 2 0 7 100 0 -1 0.000 0 0 -1 0 0 2
+	 4725 450 4725 900
+4 1 4 100 0 18 18 0.0000 4 270 870 2115 765 SS:[In]\001
+4 1 4 100 0 18 18 0.0000 4 270 1020 2115 1395 SS:[sIn]\001
+4 1 0 100 0 18 24 0.0000 4 285 510 4410 1125 R:r\001
+4 1 4 100 0 18 14 0.0000 4 210 270 4860 540 [2]\001
+4 1 4 100 0 18 14 0.0000 4 210 270 4860 1215 [4]\001
+4 1 4 100 0 18 14 0.0000 4 210 270 3870 1215 [3]\001
+4 1 4 100 0 18 14 0.0000 4 210 270 3870 540 [1]\001
+4 1 4 100 0 18 18 0.0000 4 270 1230 6795 765 SS:[Out]\001
+4 1 4 100 0 18 18 0.0000 4 270 1380 6885 1440 SS:[sOut]\001

Index: mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_cr.r
==================================================================
--- mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_cr.r
+++ mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_cr.r
@@ -1,17 +1,67 @@
-%%% Sensitivity RS component CR
-in "lin.cr";
-in "slin.cr";
+%% CR file for sFMR
+%% Just for flow input definition of r, ie must use with flow,r;k_s
+in "$MTT_CRS/r/slin.cr";
+
+OPERATOR sRS;
+
+% Ordinary RS port
+% R component
+FOR ALL gain_cause,r,rs,out_cause,inp,sinp,in_cause,temp,stemp
+LET sRS(gain_cause,r,rs,out_cause,1,
+	inp,in_cause,1,
+	temp,effort,2,
+	sinp,in_cause,3,
+	stemp,effort,4
+	) 
+        = lin(gain_cause,r,temp_cause,1,
+               inp,in_cause,1);
+% Entropy flow 
+FOR ALL gain_cause,r,rs,out_cause,inp,sinp,in_cause,temp,stemp
+LET sRS(gain_cause,r,rs,out_cause,2,
+	inp,in_cause,1,
+	temp,effort,2,
+	sinp,in_cause,3,
+	stemp,effort,4
+	) 
+        = lin(gain_cause,r,temp_cause,1,
+               inp,in_cause,1)/temp;
+
+% Sensitivity ports
+FOR ALL gain_cause,r,rs,out_cause,inp,sinp,in_cause,temp,stemp
+LET sRS(gain_cause,r,rs,out_cause,3,
+	inp,in_cause,1,
+	temp,effort,2,
+	sinp,in_cause,3,
+	stemp,effort,4
+	) 
+        = slin(gain_cause,r,rs,temp_cause,2,
+               inp,in_cause,1,
+               sinp,in_cause,2
+        );
 
 %% Sensitivity entropy flow
-FOR ALL e_r,f_r,de_r,df_r,Temp,dTemp LET
-sRS(flow,6,
-	e_r,effort,1,
-	f_r,flow,2,
-	de_r,effort,3,
-	df_r,flow,4,
-	Temp,effort,5,
-	dTemp,effort,6
-	) = ((e_r*df_r + de_r*f_r)*Temp - e_r*f_r*dTemp)/(Temp^2);
-
+%% - flow in
+FOR ALL gain_cause,r,rs,out_cause,inp,sinp,in_cause,temp,stemp
+LET sRS(gain_cause,r,rs,out_cause,4,
+	inp,flow,1,
+	temp,effort,2,
+	sinp,flow,3,
+	stemp,effort,4
+	) 
+        = 2*inp*sinp*r/temp
+        + (inp^2)*rs/temp
+        - (inp^2)*r*temps/(temp^2);
+
+%% - effort in
+FOR ALL gain_cause,r,rs,out_cause,inp,sinp,in_cause,temp,stemp
+LET sRS(gain_cause,r,rs,out_cause,4,
+	inp,effort,1,
+	temp,effort,2,
+	sinp,effort,3,
+	stemp,effort,4
+	) 
+        = 2*inp*sinp/(r*temp)
+        - (inp^2)*rs/((r^2)*temp)
+        - (inp^2)*stemp/(r*temp^2);
 
 END;

Index: mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_desc.tex
==================================================================
--- mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_desc.tex
+++ mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_desc.tex
@@ -1,34 +1,37 @@
 % -*-latex-*- Put EMACS into LaTeX-mode
-% Verbal description for system sRS (sRS_desc.tex)
-% Generated by MTT on Tue Jul 3 04:04:25 BST 2001.
+% Verbal description for system sRS (sFMR_desc.tex)
+% Generated by MTT on Thu Jul 5 23:47:35 BST 2001.
 
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% Revision 1.1  2001/07/06 01:17:14  gawthrop
+% %% New sensitivity components (for extruder model)
+% %%
 % %% Revision 1.1  2000/12/28 09:13:38  peterg
 % %% Initial revision
 % %%
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
    The acausal bond graph of system \textbf{sRS} is
-   displayed in Figure \Ref{fig:sRS_abg.ps} and its label
-   file is listed in Section \Ref{sec:sRS_lbl}.
-   The subsystems are listed in Section \Ref{sec:sRS_sub}.
-
-   This component implements the \emph{sensitivity} component
-   corresponding to the \textbf{RS} component.
-   \begin{itemize}
-   \item The non-thermal side is just the sensitivity R component
-     \textbf{sR}.
-   \item The thermal side implements:
-     \begin{equation}
-      \dot{s} = \frac{ef}{T}
-     \end{equation}
-     \begin{equation}
-      {\dot{s}}^\prime = \frac{(e^\prime f + ef^\prime)T - efT^\prime }{T^2}
-     \end{equation}
-     where the prime indicates the derivative with respect to the
-     sensitivity parameter.
-   \end{itemize}
+   displayed in Figure \Ref{fig:sFMR_abg.ps} and its label
+   file is listed in Section \Ref{sec:sFMR_lbl}.
+   The subsystems are listed in Section \Ref{sec:sFMR_sub}.
+
+
+This is the sensitivity version of the \textbf{FMR} (flow-modulated
+resistor) component.
+
+In the linear case, the CR of the standard port is:
+\begin{equation}
+  e = mrf
+\end{equation}
+where $e$ is the effort, $m$ the (flow) modulation, $r$ the
+``resistance'' and $f$ the flow.
+
+The corresponding sensitivity CR is:
+\begin{equation}
+  e^\prime  = m^\prime rf + mr^\prime f + mrf^\prime
+\end{equation}

Index: mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_lbl.txt
==================================================================
--- mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_lbl.txt
+++ mttroot/mtt/lib/comp/compound/Sensitivity/sRS/sRS_lbl.txt
@@ -1,44 +1,31 @@
-#SUMMARY sRS Sensitivity version of the RS component
+#SUMMARY sRS Sensitivity version of RS
+
+in "$MTT_CRS/r/slin.cr";
 
 ## System sRS, representation lbl, language txt
-## File sRS_lbl.txt
-## Generated by MTT on Mon Jul  2 23:56:55 BST 2001
-
-  ###############################################################
-  ## Version control history
-  ###############################################################
-  ## $Id$
-  ## $Log$
-  ## Revision 1.2  2001/07/03 23:49:51  gawthrop
-  ## Added documentation line
-  ##
-  ## Revision 1.1  2001/07/03 23:40:57  gawthrop
-  ## New sensitivity version of the RS component
-  ##
-  ###############################################################
 
 ## Port aliases
 #ALIAS	in	In,sIn
 #ALIAS	out	Out,sOut
+
 
 ## Argument aliases
 #ALIAS	$1	flow,r
-#ALIAS	$2	k_s
+#ALIAS	$2	r_s
 
 ## Each line should be of one of the following forms:
 ##	     a comment (ie starting with #)
 ##	     component-name	cr_name	arg1,arg2,..argn
 ##	     blank
 
 ## ---- Component labels ----
 
 ## Component type R
-	rs	lin		flow,r		
-	sr	slin		flow,r;k_s		
-	ss	sRS
+	r	sRS		flow,r,rs		
 
 ## Component type SS
 	[In]	SS		external,external		
-	[Out]	SS		external,external		
 	[sIn]	SS		external,external		
+	[Out]	SS		external,external		
 	[sOut]	SS		external,external		
+