- Timestamp:
- Nov 18, 2022, 5:43:19 PM (17 months ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- 0661780885c7599c6bf16f79e89ec0b5eb70cb5e
- Parents:
- 5402db6f2640db86a5bb5b61fb889447468a98b3
- git-author:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2022-11-18 17:43:19+01:00
- git-committer:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2022-11-18 17:46:46+01:00
- Location:
- kernel/GBEngine
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/GBEngine/kutil.cc
r5402db6 r9a41ab0 11890 11890 11891 11891 #ifdef HAVE_SHIFTBBA 11892 poly pMove2CurrTail(poly p, kStrategy strat)11893 {11894 /* assume: p is completely in currRing */11895 /* produces an object with LM in curring11896 and TAIL in tailring */11897 if (pNext(p)!=NULL)11898 {11899 pNext(p) = prMoveR(pNext(p), /* src */ currRing, /* dest */ strat->tailRing);11900 }11901 return(p);11902 }11903 #endif11904 11905 #ifdef HAVE_SHIFTBBA11906 poly pMoveCurrTail2poly(poly p, kStrategy strat)11907 {11908 /* assume: p has LM in curring and TAIL in tailring */11909 /* convert it to complete currRing */11910 11911 /* check that LM is in currRing */11912 assume(p_LmCheckIsFromRing(p, currRing));11913 11914 if (pNext(p)!=NULL)11915 {11916 pNext(p) = prMoveR(pNext(p), /* src */ strat->tailRing, /* dest */currRing);11917 }11918 return(p);11919 }11920 #endif11921 11922 #ifdef HAVE_SHIFTBBA11923 11892 poly pCopyL2p(LObject H, kStrategy strat) 11924 11893 { … … 12806 12775 /* ksCreateShortSpoly needs two Lobject-kind presentations */ 12807 12776 /* p is already in this form, so convert q */ 12808 // q = pMove2CurrTail(q, strat);12809 12777 Lp.p = ksCreateShortSpoly(q, p, strat->tailRing); 12810 12778 // } -
kernel/GBEngine/kutil.h
r5402db6 r9a41ab0 858 858 } 859 859 860 poly pMove2CurrTail(poly p, kStrategy strat);861 862 poly pMoveCurrTail2poly(poly p, kStrategy strat);863 864 860 poly pCopyL2p(LObject h, kStrategy strat); 865 861
Note: See TracChangeset
for help on using the changeset viewer.