Changeset 2c16b8 in git


Ignore:
Timestamp:
Jun 14, 2012, 10:16:48 PM (12 years ago)
Author:
Oleksandr Motsak <motsak@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '45e267b9942dec9429fe249ce3e5e44ab80a6a3a')
Children:
14e93b441b4c859a8d51eeeb99f68c2ff924c4bd
Parents:
f12f9afa4f10601ec91e93721efb6b1863d06be6
git-author:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-06-14 22:16:48+02:00
git-committer:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2014-05-07 04:41:45+02:00
Message:
first call to sort cannot ask for temp ring attributes + minor changes
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/schreyer.lib

    rf12f9a r2c16b8  
    139139    "Sinit::Input";
    140140    type(M);
    141     DetailedPrint(M);
     141//    DetailedPrint(M);
    142142    attrib(M);
    143143  }
     
    185185    attrib(M);
    186186    attrib(M, "isHomog");
    187     DetailedPrint(M);
     187//    DetailedPrint(M);
    188188  }
    189189
     
    496496  } else
    497497  {
    498     int @DEBUG = !system("with", "ndebug");
     498    int @DEBUG = 0; // !system("with", "ndebug");
    499499  }
    500500
     
    912912  {
    913913    "SSComputeLeadingSyzygyTerms::Output: ";
    914     "SS: ";
    915     SS;
     914    "SS: "; SS;
    916915  }
    917916 
     
    11221121  module S2 = Tail(SS);
    11231122  SS = lead(SS); // (C,lp) on base ring!
     1123
     1124  if( @SYZCHECK )
     1125  {
     1126    if( ncols(SS) != ncols(S2) ) // || size(SS) != ncols(SS) || size(S2) != ncols(S2)
     1127    {
     1128      "ERROR: SSCompute2LeadingSyzygyTerms: inappropriate S2 / SS: ";     
     1129      type(SS);
     1130      type(S2);
     1131      L;
     1132      $
     1133    }
     1134  } 
    11241135             
    11251136  if( @DEBUG )
     
    15471558  }
    15481559
    1549   if( typeof( attrib(basering, "SYZCHECK") ) == "int" )
    1550   {
    1551     int @SYZCHECK = attrib(basering, "SYZCHECK");
    1552   } else
    1553   {
    1554     int @SYZCHECK = @DEBUG;
    1555   }
    1556  
     1560  if( typeof( attrib(basering, "KERCHECK") ) == "int" )
     1561  {
     1562    int @KERCHECK = attrib(basering, "KERCHECK");
     1563  } else
     1564  {
     1565    int @KERCHECK = @DEBUG;
     1566  }
    15571567 
    15581568  if( @DEBUG )
  • dyn_modules/syzextra/mod_main.cc

    rf12f9a r2c16b8  
    517517          newid->m[i] = NULL;
    518518     
     519      newid->rank = id_RankFreeModule(newid, currRing);
     520     
    519521      res->data = newid;
    520522    }
     
    804806
    805807#ifndef NDEBUG
    806   const BOOLEAN __DEBUG__ = (BOOLEAN)((long)(atGet(currRingHdl,"DEBUG",INT_CMD, (void*)TRUE)));
     808  const BOOLEAN __DEBUG__ = (BOOLEAN)((long)(atGet(currRingHdl,"DEBUG",INT_CMD, (void*)FALSE)));
    807809#else
    808810  const BOOLEAN __DEBUG__ = (BOOLEAN)((long)(atGet(currRingHdl,"DEBUG",INT_CMD, (void*)FALSE)));
     
    14311433  const BOOLEAN __SYZCHECK__ = (BOOLEAN)((long)(atGet(currRingHdl,"SYZCHECK",INT_CMD, (void*)0)));   
    14321434
     1435  const BOOLEAN __HYBRIDNF__ = (BOOLEAN)((long)(atGet(currRingHdl,"HYBRIDNF",INT_CMD, (void*)0)));
     1436
     1437  assume( __HYBRIDNF__ );
     1438 
    14331439  if ((h==NULL) || (h->Typ() != VECTOR_CMD) || (h->Data() == NULL))
    14341440  {
     
    19621968  ideal FF = id_Copy(F, r);
    19631969
     1970
     1971 
    19641972  lists l=(lists)omAllocBin(slists_bin);
    19651973  l->Init(2);
Note: See TracChangeset for help on using the changeset viewer.