Changeset 2b98ae in git for Tst/Short/deform_s.tst
- Timestamp:
- Nov 22, 1999, 5:07:46 PM (24 years ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- 999dd8fae8085a99f8efe1e36eb447c35ab10d89
- Parents:
- c4a5d8b79deb884bfced01c42a6ea982660e2f68
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Tst/Short/deform_s.tst
rc4a5d8 r2b98ae 7 7 example versal; 8 8 // rest of what used to be in that example 9 int p = printlevel; 9 10 ring r2 = 0,(x,y,z),ds; 10 11 ideal Fo = x2,xy,yz,zx; 11 12 printlevel = 2; 12 13 versal(Fo); 14 setring(So); 15 ideal Js=imap(Px,Js); 16 hilb(std(Js)); 13 17 printlevel = p; 14 18 if(system("with","Namespaces")) { kill Ring::Px,Top::Qx,Ring::So; } … … 33 37 setring Px; 34 38 listvar(Px); 39 setring(So); 40 ideal Js=imap(Px,Js); 41 hilb(std(Js)); 35 42 kill_rings(); 36 43 ring Po = 0,(x,y),dp; … … 49 56 setring Px; 50 57 listvar(Px); 58 setring(So); 59 ideal Js=imap(Qx,Js); 60 hilb(std(Js)); 51 61 setring(Po); 52 62 kill_rings();
Note: See TracChangeset
for help on using the changeset viewer.