Changeset d9c8d3 in git for Singular/fglm.cc

Timestamp:

Jan 23, 1998, 3:20:46 PM (26 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

f1201aeda3c936a00561052557964a012e827d7e

Parents:

5f6df6f34dfdbe021b6854f9f20fa223f27dc78d

Message:

* incoporated finduni into top-level.


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

File:

• Singular/fglm.cc (modified) (2 diffs)

Singular/fglm.cc

@@ -1 +1 @@
 // emacs edit mode for this file is -*- C++ -*-
-// $Id: fglm.cc,v 1.11 1997-12-15 22:46:22 obachman Exp $ 
+// $Id: fglm.cc,v 1.12 1998-01-23 14:20:38 obachman Exp $ 
 
 /****************************************
@@ -316 +316 @@
 }
 
+BOOLEAN
+findUniProc( leftv result, leftv first ) 
+{
+    ideal sourceIdeal;
+    ideal destIdeal;
+    
+    idhdl sourceIdealHdl = (idhdl)first->data;
+    sourceIdeal= IDIDEAL(sourceIdealHdl);
+    
+    destIdeal= FindUnivariateWrapper( sourceIdeal );
+    
+    result->rtyp = IDEAL_CMD;
+    result->data= (void *)destIdeal;
+    
+        return FALSE;
+}
 #endif
 // ----------------------------------------------------------------------------