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,14 +17,17 @@
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% 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,:);
+bonds(2,:) = bonds(2,2:-1:1);
 [bonds,status] = TF_cause(bonds);
-bonds(2,:) = - bonds(2,:);
+bonds(2,:) = - bonds(2,2:-1:1);