Changeset 18255d in git for Singular/kutil.h

Timestamp:

Mar 19, 1998, 5:05:53 PM (26 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

737b2b4e3dd7efb3603cab701c4146ea17e9805e

Parents:

7f1b912b1613387b9ef8e0f2a053a2c335b9b5da

Message:

1998-03-18  Olaf Bachmann  <obachman@mathematik.uni-kl.de>

	* Cleaned up COMP_FAST and related #defines almost everywhere


git-svn-id: file:///usr/local/Singular/svn/trunk@1255 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/kutil.h (modified) (2 diffs)

Singular/kutil.h

@@ -4 +4 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kutil.h,v 1.5 1998-03-16 14:56:35 obachman Exp $ */
+/* $Id: kutil.h,v 1.6 1998-03-19 16:05:48 obachman Exp $ */
 /*
 * ABSTRACT: kernel: utils for std
@@ -173 +173 @@
 BOOLEAN homogTest(polyset F, int Fmax);
 BOOLEAN newHEdge(polyset S, int ak,kStrategy strat);
-rOrderType_t spGetOrderType(ring r, kStrategy strat);
+
+rOrderType_t spGetOrderType(ring r, int modrank, int syzcomp);
+inline rOrderType_t spGetOrderType(ring r, kStrategy strat)
+{
+  return spGetOrderType(r, strat->ak, strat->syzComp);
+}
+
+inline int MAX(int a, int b)
+{
+  if (a > b) return a;
+  else return b;
+}
+
 
 inline TSet initT () { return (TSet)Alloc0(setmax*sizeof(TObject)); }