Changeset 750069 in git for Singular/dyn_modules/syzextra/syzextra.cc
- Timestamp:
- Sep 22, 2016, 3:41:32 PM (8 years ago)
- Branches:
- (u'spielwiese', '6e5adcba05493683b94648c659a729c189812c77')
- Children:
- 4ef909357cd2764e39044e78dc5f8f271de19c21
- Parents:
- c4ea0bb97e0fcd6d7e4ea58106ce9935683b32de6c086a438d710cf8f1f5eac494377370eacf969c
- git-author:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2016-09-22 15:41:32+02:00
- git-committer:
- GitHub <noreply@github.com>2016-09-22 15:41:32+02:00
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/dyn_modules/syzextra/syzextra.cc
r6c086a4 r750069 166 166 pNext(s) = NULL; 167 167 168 if( !n_IsZero( p _GetCoeff(s, R), R) )168 if( !n_IsZero( pGetCoeff(s), R->cf) ) 169 169 { 170 170 const int i = p_GetComp(s, R) - 1; … … 480 480 481 481 poly m = p_LmInit(p, r); 482 p_SetCoeff0(m, n_Copy(p _GetCoeff(p, r), r), r);482 p_SetCoeff0(m, n_Copy(pGetCoeff(p), r->cf), r); 483 483 484 484 if( bSetZeroComp ) … … 647 647 { 648 648 poly ss = p_LmInit(t, r); 649 p_SetCoeff0(ss, n_Init(1, r ), r); // for delete & printout only!...649 p_SetCoeff0(ss, n_Init(1, r->cf), r); // for delete & printout only!... 650 650 p_SetComp(ss, (*vit)->label() + 1, r); // coeff? 651 651 p_Setm(ss, r); … … 1640 1640 p_Test(multiplier, r); 1641 1641 1642 if( !n_Equal( pGetCoeff(multiplier), pGetCoeff(itr->first), r ) ) // normalize coeffs!?1642 if( !n_Equal( pGetCoeff(multiplier), pGetCoeff(itr->first), r->cf) ) // normalize coeffs!? 1643 1643 { 1644 number n = n_Div( pGetCoeff(multiplier), pGetCoeff(itr->first), r ); // new number1644 number n = n_Div( pGetCoeff(multiplier), pGetCoeff(itr->first), r->cf); // new number 1645 1645 1646 1646 if( UNLIKELY( OPT__TREEOUTPUT ) ) 1647 1647 { 1648 1648 StringSetS(""); 1649 n_Write(n, r );1649 n_Write(n, r->cf); 1650 1650 char* s = StringEndS(); 1651 1651 Print("\"recale\": \"%s\", ", s); … … 1656 1656 1657 1657 p = p_Mult_nn(p, n, r); // ! 1658 n_Delete(&n, r );1658 n_Delete(&n, r->cf); 1659 1659 } else 1660 1660 if( UNLIKELY( OPT__PROT ) ) ++ m_stat[6]; // PrintS("l"); // lookup no rescale … … 2216 2216 // assume ( !n_IsZero( p_GetCoeff(product, r), r ) ); 2217 2217 2218 assume ( !n_IsZero( p _GetCoeff(lt(), r), r) );2218 assume ( !n_IsZero( pGetCoeff(lt()), r->cf ) ); 2219 2219 assume( sev() == p_GetShortExpVector(lt(), r) ); 2220 2220 … … 2238 2238 bool CLeadingTerm::DivisibilityCheck(const poly m, const poly t, const unsigned long not_sev, const ring r) const 2239 2239 { 2240 assume ( !n_IsZero( p _GetCoeff(lt(), r), r) );2240 assume ( !n_IsZero( pGetCoeff(lt()), r->cf ) ); 2241 2241 assume( sev() == p_GetShortExpVector(lt(), r) ); 2242 2242 2243 2243 assume( m != NULL ); 2244 2244 assume( t != NULL ); 2245 assume ( !n_IsZero( p _GetCoeff(m, r), r) );2246 assume ( !n_IsZero( p _GetCoeff(t, r), r) );2245 assume ( !n_IsZero( pGetCoeff(m), r->cf ) ); 2246 assume ( !n_IsZero( pGetCoeff(t), r->cf ) ); 2247 2247 2248 2248 // assume( p_GetComp(m, r) == 0 ); … … 2521 2521 assume( m != NULL ); 2522 2522 assume( t != NULL ); 2523 assume ( !n_IsZero( p _GetCoeff(m, m_rBaseRing), m_rBaseRing) );2524 assume ( !n_IsZero( p _GetCoeff(t, m_rBaseRing), m_rBaseRing) );2523 assume ( !n_IsZero( pGetCoeff(m), m_rBaseRing->cf ) ); 2524 assume ( !n_IsZero( pGetCoeff(t), m_rBaseRing->cf ) ); 2525 2525 2526 2526 p_Test(m, m_rBaseRing); … … 2705 2705 } 2706 2706 2707 number n = n_Mult( p _GetCoeff(multiplier, r), p_GetCoeff(t, r), r);2707 number n = n_Mult( pGetCoeff(multiplier), pGetCoeff(t), r->cf); 2708 2708 2709 2709 #if NODIVISION 2710 2710 // we assume all leading coeffs to be 1! 2711 assume( n_IsOne(p _GetCoeff(p, r), r->cf) );2711 assume( n_IsOne(pGetCoeff(p), r->cf) ); 2712 2712 #else 2713 if( !n_IsOne( p _GetCoeff(p, r), r ) )2714 n = n_Div(n, p _GetCoeff(p, r), r);2715 #endif 2716 2717 p_SetCoeff0(q, n_InpNeg(n, r ), r);2713 if( !n_IsOne( pGetCoeff(p), r ) ) 2714 n = n_Div(n, pGetCoeff(p), r->cf); 2715 #endif 2716 2717 p_SetCoeff0(q, n_InpNeg(n, r->cf), r); 2718 2718 // n_Delete(&n, r); 2719 2719 … … 2921 2921 #if NODIVISION 2922 2922 assume( n_IsOne(p_GetCoeff(p, r), r->cf) ); 2923 p_SetCoeff0(q, n_InpNeg( n_Copy(p _GetCoeff(product, r), r), r), r);2923 p_SetCoeff0(q, n_InpNeg( n_Copy(pGetCoeff(product), r->cf), r->cf), r); 2924 2924 #else 2925 p_SetCoeff0(q, n_InpNeg( n_Div( p _GetCoeff(product, r), p_GetCoeff(p, r), r), r), r);2925 p_SetCoeff0(q, n_InpNeg( n_Div( pGetCoeff(product), p_GetCoeff(p), r->cf), r->cf), r); 2926 2926 #endif 2927 2927
Note: See TracChangeset
for help on using the changeset viewer.