Changeset c903a3 in git for kernel/kInline.cc
- Timestamp:
- Feb 1, 2007, 5:39:30 PM (17 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- f4b74e24435694d98ef9a9bec0af428cd1ff0629
- Parents:
- db70a23edf7040a3fa40d7ac55c0c84cd08b970e
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/kInline.cc
rdb70a23 rc903a3 7 7 * Author: obachman (Olaf Bachmann) 8 8 * Created: 8/00 9 * Version: $Id: kInline.cc,v 1. 3 2006-05-08 12:55:10 Singular Exp $9 * Version: $Id: kInline.cc,v 1.4 2007-02-01 16:39:30 Singular Exp $ 10 10 *******************************************************************/ 11 11 #ifndef KINLINE_CC … … 1045 1045 } 1046 1046 1047 static inline void clearS (poly p, unsigned long p_sev, int* at, int* k, 1048 kStrategy strat) 1049 { 1050 assume(p_sev == pGetShortExpVector(p)); 1051 if (strat->noClearS) return; 1052 if (!pLmShortDivisibleBy(p,p_sev, strat->S[*at], ~ strat->sevS[*at])) return; 1053 deleteInS((*at),strat); 1054 (*at)--; 1055 (*k)--; 1056 } 1057 1047 1058 #endif // defined(KINLINE) || defined(KUTIL_CC) 1048 1059 #endif // KINLINE_CC
Note: See TracChangeset
for help on using the changeset viewer.