Changeset a1e8742 in git for Singular/modulop.cc
- Timestamp:
- Mar 2, 2000, 7:44:39 PM (24 years ago)
- Branches:
- (u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38dfc5131670d387a89455159ed1e071997eec94')
- Children:
- b74df82da5481f8597c226c901371bb6fb30e477
- Parents:
- ff5e0d08ed70bf7df92e057766905c2014edc1bb
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/modulop.cc
rff5e0d ra1e8742 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: modulop.cc,v 1.1 4 1999-11-15 17:20:28 obachmanExp $ */4 /* $Id: modulop.cc,v 1.15 2000-03-02 18:44:39 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: numbers modulo p (<=32003) … … 63 63 number npAdd (number a, number b) 64 64 { 65 int ka = (int)a + (int)b; 66 if (ka >= npPrimeM) ka -= npPrimeM; 67 return (number)ka; 65 return npAddM(a,b); 68 66 } 69 67 70 68 number npSub (number a, number b) 71 69 { 72 // int ka = (int)a - (int)b;73 // if (ka < 0) ka += npPrimeM;74 // *(int *)c = ka;75 70 return npSubM(a,b); 76 71 }
Note: See TracChangeset
for help on using the changeset viewer.