Index: mttroot/mtt/lib/comp/simple/GY_cause.m
==================================================================
--- mttroot/mtt/lib/comp/simple/GY_cause.m
+++ mttroot/mtt/lib/comp/simple/GY_cause.m
@@ -17,17 +17,20 @@
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% Revision 1.2  1997/09/12  09:42:12  peterg
+% %% Fixed causality bug.
+% %%
 % %% Revision 1.1  1996/11/01  12:04:25  peterg
 % %% Initial revision
 % %% 
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 
 % Copyright (c) P.J. Gawthrop, 1996.
 
 %Causality of GY is same as that of a TF but with flipped effort/flow
-bonds(2,:) = bonds(2,2:-1:1);
+bonds(2,:) = - bonds(2,2:-1:1);
 [bonds,status] = TF_cause(bonds);
 bonds(2,:) = - bonds(2,2:-1:1);