* Bug #13217 fixed - CACSD: fixed augment return when flag2="i"
[scilab.git] / scilab / modules / cacsd / macros / augment.sci
index fdd1459..4868e18 100644 (file)
@@ -197,7 +197,7 @@ function [P,r]=augment(G,SRT,flag)
                 P=[Iu,-Iu;
                 G,-G;
                 Ouu,Iu;
-                -G,G]
+                G,-G]
             end
             return
         case 2 then
@@ -213,7 +213,7 @@ function [P,r]=augment(G,SRT,flag)
                 if ssSRT==1 then
                     P=[Iu,-Iu;
                     G,-G;
-                    -G,G]
+                    G,-G]
                 end
                 return
             end
@@ -229,7 +229,7 @@ function [P,r]=augment(G,SRT,flag)
                 if ssSRT ==1 then
                     P=[Iu,-Iu;
                     Ouu,Iu;
-                    -G,G]
+                    G,-G]
                 end
                 return
             end
@@ -245,7 +245,7 @@ function [P,r]=augment(G,SRT,flag)
                 if ssSRT ==1 then
                     P=[G,-G;
                     Ouu,Iu;
-                    -G,G]
+                    G,-G]
                 end
                 return
             end
@@ -265,7 +265,7 @@ function [P,r]=augment(G,SRT,flag)
                 end;
                 if ssSRT ==1 then
                     P=[Iu,-Iu;
-                    -G,G]
+                    G,-G]
                 end
                 return
             end
@@ -279,7 +279,7 @@ function [P,r]=augment(G,SRT,flag)
                 end
                 if ssSRT ==1 then
                     P=[G,-G;
-                    -G,G]
+                    G,-G]
                 end
                 return
             end
@@ -293,7 +293,7 @@ function [P,r]=augment(G,SRT,flag)
                 end
                 if ssSRT ==1 then
                     P=[Ouu,Iu;
-                    -G,G]
+                    G,-G]
                 end
                 return
             end