Changeset 7ec0614 in git for Singular/ipassign.cc
- Timestamp:
- Oct 26, 2010, 12:06:40 PM (14 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- a53ae5000c439608b9dcf884b63d62b219e8fcc0
- Parents:
- f7449ff74c2f2331426674adbf6689f8bb8c3e8c
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ipassign.cc
rf7449f r7ec0614 40 40 #include <Singular/ipshell.h> 41 41 #include <kernel/sca.h> 42 #include <Singular/Fan.h>43 42 #include <gfanlib/gfanlib.h> 44 43 … … 322 321 } 323 322 #ifdef HAVE_FANS 323 /* 324 324 static BOOLEAN jiA_FAN(leftv res, leftv a, Subexpr e) 325 325 { … … 338 338 res->data=(void*)fff; 339 339 return FALSE; 340 } 340 }*/ 341 341 static BOOLEAN jiA_CONE(leftv res, leftv a, Subexpr e) 342 342 { … … 1336 1336 } 1337 1337 #ifdef HAVE_FANS 1338 /* 1338 1339 BOOLEAN jjAssignFan(leftv l, leftv r) 1339 { 1340 {*/ 1340 1341 /* method for generating a fan; 1341 1342 valid parametrizations: (intmat or 0, intmat or 0, intmat or 0), … … 1349 1350 - numbers of rows in 1st, 2nd, and/or 3rd argument intmat 1350 1351 disagree */ 1351 intvec* maxRays = NULL; /* maximal rays */1352 intvec* facetNs = NULL; /* facet normals */1353 intvec* linSpace = NULL; /* lineality space */1354 1352 // intvec* maxRays = NULL; /* maximal rays */ 1353 // intvec* facetNs = NULL; /* facet normals */ 1354 // intvec* linSpace = NULL; /* lineality space */ 1355 /* 1355 1356 leftv x = r; 1356 1357 if (x->Typ() == INTMAT_CMD) maxRays = (intvec*)x->Data(); … … 1403 1404 IDDATA((idhdl)l->data) = (char*)fff; 1404 1405 return FALSE; 1405 } 1406 }*/ 1406 1407 BOOLEAN jjAssignCone(leftv l, leftv r) 1407 1408 { … … 1556 1557 } 1557 1558 #ifdef HAVE_FANS 1559 /* 1558 1560 else if ((lt == FAN_CMD) && (rl == 3)) 1559 1561 { 1560 1562 return jjAssignFan(l, r); 1561 } 1563 }*/ 1562 1564 #endif /* HAVE_FANS */ 1563 1565 if (rt==NONE) rt=r->Typ();
Note: See TracChangeset
for help on using the changeset viewer.