Changeset f7a540 in git
- Timestamp:
- Aug 19, 2019, 1:28:07 PM (5 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 860f23ac4f4b9df33c3137f290981b3434d662bc
- Parents:
- 309b8ae0c68d542d1d8a75fa675c060e90e18440
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/resolve.lib
r309b8a rf7a540 667 667 //--- control the names of the variables 668 668 list l2; 669 for (int ii = 1; ii <= n; ii++) 669 int ii; 670 for (ii = 1; ii <= n; ii++) 670 671 { 671 672 l2[ii] = "x("+string(ii)+")"; … … 711 712 //to have the list depending on R in case BO[4] is empty 712 713 713 l ist l2 = ringlist(R)[2];714 for (i nt ii = 0; ii <= s-1; ii++)714 l2 = ringlist(R)[2]; 715 for (ii = 0; ii <= s-1; ii++) 715 716 { 716 717 l2[size(l2)+1] = "y("+string(ii)+")"; … … 719 720 list resu; 720 721 list B; 721 l ist l2 = ringlist(R)[2];722 for (i nt ii = 0; ii <= s-1; ii++)722 l2 = ringlist(R)[2]; 723 for (ii = 0; ii <= s-1; ii++) 723 724 { 724 725 l2[size(l2)+1] = "y("+string(ii)+")"; 725 726 } 726 727 l2[size(l2)+1] = "t"; 727 ring S= create_ring(ringlist(R)[1], l2, "dp", "no_minpoly");728 ring T = create_ring(ringlist(R)[1], l2, "dp", "no_minpoly"); 728 729 ideal C=imap(R,C); 729 730 ideal W=imap(R,W);
Note: See TracChangeset
for help on using the changeset viewer.