aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorbremner <bremner@09fa754a-f411-0410-976a-da6bfa213b30>2006-06-01 16:12:57 +0000
committerbremner <bremner@09fa754a-f411-0410-976a-da6bfa213b30>2006-06-01 16:12:57 +0000
commitc5353a9a9fd01a416f5bdab2ab904f693dfab797 (patch)
treeb1279c064b95257f7c5767429c32dfe7049fd4cc
parent3b47bc4c19aed0c369d9299ecd08ce57ff3bbc8d (diff)
fixed stupid bug
git-svn-id: file:///export/data/bremner/svn/trunk/inetools@5356 09fa754a-f411-0410-976a-da6bfa213b30
-rw-r--r--rat2canon.c10
1 files changed, 9 insertions, 1 deletions
diff --git a/rat2canon.c b/rat2canon.c
index 88b72b3..872a286 100644
--- a/rat2canon.c
+++ b/rat2canon.c
@@ -128,10 +128,18 @@ int main(argc,argv)
if (looking==1 && !zero(num)){
copy(num0,num);
+
+ if (negative(num)) {
+ changesign(num0);
+ itomp(-1,An[i][j]);
+ } else {
+ itomp(1,An[i][j]);
+ }
+
copy(den0,den);
- itomp(1,An[i][j]);
itomp(1,Ad[i][j]);
+
looking=0;
} else {