Changeset e6f1e6 in git for Singular/ipshell.cc
- Timestamp:
- May 17, 2016, 5:26:29 PM (8 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 6f203b6a99801e807e56ef784f79d4951204b9e5
- Parents:
- f8fb93d1bc922d1e97207d1d5b347fe1db1eedcf
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ipshell.cc
rf8fb93d re6f1e6 1798 1798 #endif 1799 1799 1800 #ifdef HAVE_RINGS1801 1800 void rDecomposeRing(leftv h,const ring R) 1802 1801 /* field is R or C */ 1803 1802 { 1803 #ifdef HAVE_RINGS 1804 1804 lists L=(lists)omAlloc0Bin(slists_bin); 1805 1805 if (rField_is_Ring_Z(R)) L->Init(1); … … 1824 1824 L->m[1].rtyp=LIST_CMD; 1825 1825 L->m[1].data=(void *)LL; 1826 } 1826 #else 1827 WerrorS("rDecomposeRing"); 1827 1828 #endif 1829 } 1828 1830 1829 1831 … … 2072 2074 rDecomposeC(&(L->m[0]),r); 2073 2075 } 2074 #ifdef HAVE_RINGS2075 2076 else if (rField_is_Ring(r)) 2076 2077 { 2077 2078 rDecomposeRing(&(L->m[0]),r); 2078 2079 } 2079 #endif2080 2080 else if ( r->cf->extRing!=NULL )// nCoeff_is_algExt(r->cf)) 2081 2081 {
Note: See TracChangeset
for help on using the changeset viewer.