Changeset 1a3911 in git for Singular/LIB/teachstd.lib
- Timestamp:
- Apr 6, 2009, 2:39:02 PM (15 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 08e081516771eec845058a046616a8c0d7e8325b
- Parents:
- 7de8e4cf4e88e60e523f5ebb65a61c114ff3674a
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/teachstd.lib
r7de8e4 r1a3911 2 2 //GMG, last modified 28.9.01 3 3 /////////////////////////////////////////////////////////////////////////////// 4 version="$Id: teachstd.lib,v 1.1 0 2009-02-12 13:57:00 motsakExp $";4 version="$Id: teachstd.lib,v 1.11 2009-04-06 12:39:02 seelisch Exp $"; 5 5 category="Teaching"; 6 6 info=" … … 78 78 { "EXAMPLE:"; echo = 2; 79 79 ring s=0,(x,y,z),(c,dp); 80 leadmonomial((y+z+x+xyz) **2);81 leadmonomial([(y+z+x+xyz) **2,xyz5]);80 leadmonomial((y+z+x+xyz)^2); 81 leadmonomial([(y+z+x+xyz)^2,xyz5]); 82 82 } 83 83 /////////////////////////////////////////////////////////////////////////////// … … 226 226 proc minEcart(T,h) 227 227 "USAGE: minEcart(T,h); T ideal or module, h poly or vector 228 RETURN: element g from T such that leadmonom(g) divides leadmonom(h) 228 RETURN: element g from T such that leadmonom(g) divides leadmonom(h)@* 229 229 ecart(g) is minimal with this property (if T != 0); 230 230 return 0 if T is 0 or h = 0 … … 413 413 RETURN: 1 if product criterion applies in the same module component, 414 414 2 if lead(f) and lead(g) involve different components, 0 else 415 NOTE: if product criterion applies we can delete (f,g) from pairset 415 NOTE: if product criterion applies we can delete (f,g) from pairset. 416 416 This procedure returns 0 if o is given and is a positive integer, or 417 417 you may set the attribute \"default_arg\" for prodcrit to 1. … … 500 500 RETURN: list L, 501 501 L[1] = the pairset of G as list (not containing pairs for 502 which the product or the chain criterion applies) 502 which the product or the chain criterion applies), 503 503 L[2] = intvec v, v[1]= # product criterion, v[2]= # chain criterion 504 504 EXAMPLE: example pairset; shows an example … … 572 572 /////////////////////////////////////////////////////////////////////////////// 573 573 proc updatePairs(P,S,h) 574 "USAGE: updatePairs(P,S,h); P list, S ideal or module, h poly or vector 574 "USAGE: updatePairs(P,S,h); P list, S ideal or module, h poly or vector@* 575 575 P a list of pairs of polys or vectors (obtained from pairset) 576 576 RETURN: list Q, 577 577 Q[1] = the pairset P enlarged by all pairs (f,h), f from S, 578 without pairs for which the product or the chain criterion applies 578 without pairs for which the product or the chain criterion applies@* 579 579 Q[2] = intvec v, v[1]= # product criterion, v[2]= # chain criterion 580 580 EXAMPLE: example updatePairs; shows an example … … 745 745 /////////////////////////////////////////////////////////////////////////////// 746 746 proc localstd (id) 747 "USAGE: localstd 747 "USAGE: localstd(id); id = ideal 748 748 RETURN: A standard basis for a local degree ordering, using Lazard's method. 749 749 NOTE: The procedure homogenizes id w.r.t. a new 1st variable local@t,
Note: See TracChangeset
for help on using the changeset viewer.