Changeset a917c9 in git


Ignore:
Timestamp:
Nov 27, 2009, 10:31:46 AM (15 years ago)
Author:
Frank Seelisch <seelisch@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '3720ae8bfcff4a4649ee98a15552089151d2d59b')
Children:
695a2d025f8cca3a2a5725e892f18e7a8dc5c5fb
Parents:
b1e9282c33e2c6c99a830d3ac17d9adf89bf8232
Message:

git-svn-id: file:///usr/local/Singular/svn/trunk@12338 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Singular-vanishing-ideal
Files:
4 added
3 edited

Legend:

Unmodified
Added
Removed
  • Singular-vanishing-ideal/Makefile.in

    rb1e928 ra917c9  
    175175    walk.cc walk_ip.cc \
    176176    cntrlc.cc misc.cc \
    177     calcSVD.cc
     177    calcSVD.cc \
     178    VanishingIdeal.cc \
     179    FactoredNumber.cc
    178180
    179181# stuff for MP
  • Singular-vanishing-ideal/claptmpl.cc

    rb1e928 ra917c9  
    256256template void noro_step<tgb_uint32>(poly*p,int &pn,slimgb_alg* c);
    257257//std::priority_queue<MonRedRes>
     258#ifdef HAVE_VANISHING_IDEAL
     259#include <list>
     260template class std::list<int>;
     261#endif /* HAVE_VANISHING_IDEAL */
    258262#endif
    259263//template int pos_helper(kStrategy strat, poly p, int len, intset setL, polyset set);
  • Singular-vanishing-ideal/extra.cc

    rb1e928 ra917c9  
    159159//#include <python_wrapper.h>
    160160#endif
     161
     162#ifdef HAVE_VANISHING_IDEAL
     163#include "VanishingIdeal.h"
     164#endif // HAVE_VANISHING_IDEAL
    161165
    162166void piShowProcList();
     
    22372241    else
    22382242#endif
     2243/*==================== vanishing ideal ======================*/
     2244#ifdef HAVE_VANISHING_IDEAL
     2245    if (strcmp(sys_cmd, "vanishingIdeal") == 0)
     2246    {
     2247      if ((h->Typ()       == STRING_CMD) &&
     2248          (h->next->Typ() == INT_CMD)    &&
     2249          (h->next->next  == NULL))
     2250      {
     2251        const char* mode                  = (const char*)     h->Data();
     2252        const int   printOperationDetails = (const int)(long) h->next->Data();
     2253        res->rtyp = IDEAL_CMD;
     2254        if      (strcmp(mode, "direct")    == 0)
     2255          res->data = gBForVanishingIdealDirect(printOperationDetails != 0 ? true : false);
     2256        else if (strcmp(mode, "recursive") == 0)
     2257          res->data = gBForVanishingIdealRecursive(printOperationDetails != 0 ? true : false);
     2258        else
     2259        {
     2260          PrintS("invalid usage: expected string parameter = 'direct' or 'recursive'"); PrintLn();
     2261          res->rtyp = INT_CMD;
     2262          res->data = 0;
     2263        }
     2264      }
     2265      else if ((h->Typ()             == STRING_CMD) &&
     2266               (h->next->Typ()       == POLY_CMD)   &&
     2267               (h->next->next->Typ() == INT_CMD)    &&
     2268               (h->next->next->next  == NULL))
     2269      {
     2270        const char* mode                  = (const char*)     h->Data();
     2271        const poly  f                     = (const poly)      h->next->Data();
     2272        const int   printOperationDetails = (const int)(long) h->next->next->Data();
     2273        if      (strcmp(mode, "normalForm") == 0)
     2274        {
     2275          res->rtyp = POLY_CMD;
     2276          res->data = normalForm(f, printOperationDetails != 0 ? true : false);
     2277        }
     2278        else if (strcmp(mode, "isZeroFunction") == 0)
     2279        {
     2280          res->rtyp = INT_CMD;
     2281          res->data = (void*)(long)(isZeroFunction(f, printOperationDetails != 0 ? true : false) ? 1 : 0);
     2282        }
     2283        else
     2284        {
     2285          PrintS("invalid usage: expected string parameter = 'normalForm' or 'isZeroFunction'"); PrintLn();
     2286          res->rtyp = INT_CMD;
     2287          res->data = 0;
     2288        }
     2289      }
     2290      else if ((h->Typ()       == INT_CMD) &&
     2291               (h->next->Typ() == INT_CMD) &&
     2292               (h->next->next  == NULL))
     2293      {
     2294        const int m                     = (const int)(long) h->Data();
     2295        const int printOperationDetails = (const int)(long) h->next->Data();
     2296        res->rtyp = INT_CMD;
     2297        if (m >= 1)
     2298          res->data = (void*)(long)smarandache(m, printOperationDetails != 0 ? true : false);
     2299        else
     2300        {
     2301          PrintS("invalid usage: expected positive integer"); PrintLn();
     2302          res->data = 0;
     2303        }
     2304      }
     2305      return FALSE;
     2306    }
     2307    else
     2308#endif
    22392309/*==================== pDivStat =============================*/
    22402310#if defined(PDEBUG) || defined(PDIV_DEBUG)
Note: See TracChangeset for help on using the changeset viewer.