Changeset 8d8fef in git for Singular/LIB/rinvar.lib
- Timestamp:
- Jul 29, 2019, 11:36:09 PM (5 years ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- feed60bef09898f675e0f8605ed0ac0eaa8bed5a
- Parents:
- da1ec3de158a4f05384b9a83be86fc4c1942ec5fc1b9ababa50e8059dd847da0957f50aea901e6a8
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/rinvar.lib
rda1ec3 r8d8fef 658 658 minPoly = string(minpoly); 659 659 } 660 execute("ring RA1=0,(" + varstr(basering) + "," + parName + "), lp;");660 ring RA1 = create_ring(0, "(" + varstr(basering) + "," + parName + ")", "lp"); 661 661 if (minPoly!="0") { execute("ideal mpoly = std(" + minPoly + ");"); } 662 662 ideal I = imap(RIRR,invarsGens); … … 962 962 minPoly = string(minpoly); 963 963 } 964 execute("ring RA1=0,(" + varstr(basering) + "," + parName + "), lp;");964 ring RA1 = create_ring(0, "(" + varstr(basering) + "," + parName + ")", "lp"); 965 965 if (minPoly!="0") { execute("ideal mpoly = std(" + minPoly + ");"); } 966 966 ideal Grp = imap(ROBR,Grp);
Note: See TracChangeset
for help on using the changeset viewer.