Changeset 803c5a1 in git
- Timestamp:
- Dec 22, 2000, 2:55:14 PM (22 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '00e2e9c41af3fde1273eb3633f4c0c7c3db2579d')
- Children:
- 8942a5b3190ffdb5622125ddc7c005c0b1b725d2
- Parents:
- 558eb2e4904ef3d1c00dc5ccf1cdf5d4d5e4532a
- Location:
- Singular/LIB
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/general.lib
r558eb2 r803c5a1 1 // $Id: general.lib,v 1.29 2000-12-19 14:37:25 anne Exp $2 1 //GMG, last modified 18.6.99 3 2 //anne, added deleteSublist and watchdog 12.12.2000 4 3 /////////////////////////////////////////////////////////////////////////////// 5 6 version="$Id: general.lib,v 1.29 2000-12-19 14:37:25 anne Exp $"; 4 version="$Id: general.lib,v 1.30 2000-12-22 13:52:31 greuel Exp $"; 7 5 category="General purpose"; 8 6 info=" 9 LIBRARY: general.lib PROCEDURES OF GENERAL TYPE7 LIBRARY: general.lib Elementary Computations of General Type 10 8 11 9 PROCEDURES: … … 1033 1031 1034 1032 proc watchdog(int i, string cmd) 1035 "USAGE : watchdog(i,cmd); i -- integer; cmd --string1033 "USAGE : watchdog(i,cmd); i integer; cmd string 1036 1034 RETURNS: Result of cmd, if the result can be computed in 1037 1035 i seconds. Otherwise the computation is interrupted after … … 1132 1130 1133 1131 proc deleteSublist(intvec v,list l) 1134 "USAGE: deleteSublist(v,l); --intvec v; list l1132 "USAGE: deleteSublist(v,l); intvec v; list l 1135 1133 where the entries of the integer vector v correspond to the 1136 1134 positions of the elements to be deleted -
Singular/LIB/graphics.lib
r558eb2 r803c5a1 1 // $Id: graphics.lib,v 1.7 2000-12-19 15:05:26 anne Exp $ 2 // 3 // author : Christian Gorzel email: gorzelc@math.uni-muenster.de 4 // 5 /////////////////////////////////////////////////////////////////////////////// 6 version="$Id: graphics.lib,v 1.7 2000-12-19 15:05:26 anne Exp $"; 1 /////////////////////////////////////////////////////////////////////////////// 2 version="$Id: graphics.lib,v 1.8 2000-12-22 13:53:49 greuel Exp $"; 7 3 category="Visualization"; 8 4 info=" 9 LIBRARY: graphics.lib PROCEDURES FOR GRAPHICS WITH MATHEMATICA 10 5 LIBRARY: graphics.lib Procedures to use Graphics with Mathematica 11 6 AUTHOR: Christian Gorzel, gorzelc@math.uni-muenster.de 7 12 8 PROCEDURES: 13 9 staircase(fname,I); Mathematica text for displaying staircase of I 14 10 mathinit(); string for loading Mathematica's ImplicitPlot 15 mplot(fname,I[# s]); 11 mplot(fname,I[# s]); Mathematica text for various plots 16 12 "; 17 13 … … 19 15 20 16 proc staircase(string fname,ideal I) 21 "USAGE: staircase( );I ideal in two variables17 "USAGE: staircase(s,I); s a string, I ideal in two variables 22 18 RETURN: string with Mathematica input for displaying staircase (exponent 23 19 vectors of initial ideal) of I … … 154 150 /////////////////////////////////////////////////////////////////////////////// 155 151 proc mplot(string fname,ideal I,list #) 156 "USAGE: mplot( I[,#]); fname string; I ideal , # strings representing the157 152 "USAGE: mplot(fname, I[,s]); fname string; I ideal, s strings representing 153 the plot region or further ideals 158 154 RETURN: string, text with Mathematica commands to display a plot 159 155 NOTE: The plotregion is defaulted to -1,1 around zero … … 170 166 ideal with 1 generator (or one polynomial) in two variables means 171 167 an implicit curve given as f == 0 172 173 168 EXAMPLE: example mplot; shows an example 174 169 " -
Singular/LIB/hnoether.lib
r558eb2 r803c5a1 1 // $Id: hnoether.lib,v 1.25 2000-12-19 15:05:27 anne Exp $ 2 // last change: 31.08.00 1 // last change, ML: 31.08.00 3 2 /////////////////////////////////////////////////////////////////////////////// 4 3 // This library is for Singular 1-3-7 or newer 5 4 6 version="$Id: hnoether.lib,v 1.2 5 2000-12-19 15:05:27 anneExp $";5 version="$Id: hnoether.lib,v 1.26 2000-12-22 13:55:14 greuel Exp $"; 7 6 category="Singularities"; 8 7 info=" 9 LIBRARY: hnoether.lib Procedures for the Hamburger-Noether (Puiseux) development 10 8 LIBRARY: hnoether.lib Hamburger-Noether (Puiseux) Development 11 9 AUTHOR: Martin Lamm, lamm@mathematik.uni-kl.de 12 10 13 11 OVERVIEW: 14 A library for computing the Hamburger-Noether resp. Puiseux 15 development of a plane curve singularity following A. Campillo: 16 Algebroid curves in positive characteristic, Lecture Notes in Math. 17 813, Springer (1980). 18 The library contains also procedures for computing the (topological) 19 numerical invariants of plane curve singularities. 12 A library for computing the Hamburger-Noether resp. Puiseux development 13 of a plane curve singularity following A. Campillo: Algebroid curves 14 in positive characteristic, Lecture Notes in Math. 813, Springer (1980). 15 The library contains also procedures for computing the (topological) 16 numerical invariants of plane curve singularities. 20 17 21 18 MAIN PROCEDURES: 22 HNdevelop(f); Hamburger-Noetherdevelopment of f23 develop(f [,n]); Hamburger-Noetherdevelopment of irreducible curves24 reddevelop(f); Hamburger-Noetherdevelopment of reducible curves25 essdevelop(f); Hamburger-Noetherdevelopment of essential branches26 extdevelop(hne,n); extension of the Hamburger-Noetherdevelopment hne of f27 param(hne [,x]); returnsa parametrization of f (input=output(develop))28 displayHNE(hne); display Hamburger-Noetherdevelopment as an ideal29 invariants(hne); invariants of f, e.g. the characteristic exponents30 displayInvariants(hne); display invariants of f31 intersection(hne1,hne2); intersection multiplicity of two curves32 multsequence(hne); sequence of multiplicities19 HNdevelop(f); Hamburger-Noether (H-N) development of f 20 develop(f [,n]); H-N development of irreducible curves 21 reddevelop(f); H-N development of reducible curves 22 essdevelop(f); H-N development of essential branches 23 extdevelop(hne,n); extension of the H-N development hne of f 24 param(hne [,x]); a parametrization of f (input=output(develop)) 25 displayHNE(hne); display H-N development as an ideal 26 invariants(hne); invariants of f, e.g. the characteristic exponents 27 multsequence(hne); sequence of multiplicities 28 displayInvariants(hne); display invariants of f 29 intersection(hne1,hne2); intersection multiplicity of two curves 33 30 displayMultsequence(hne); display sequence of multiplicities 34 stripHNE(hne); reduce amount of memory consumed by hne35 is_irred(f); test for irreducibility31 stripHNE(hne); reduce amount of memory consumed by hne 32 is_irred(f); test for irreducibility 36 33 37 34 AUXILIARY PROCEDURES: 38 puiseux2generators(m,n); convert Puiseux pairs to generators of semigroup39 multiplicities(hne); multiplicities of blowed up curves40 separateHNE(hne1,hne2); number of quadratic transf. needed for separation41 squarefree(f); returnsa squarefree divisor of the poly f42 allsquarefree(f,l); returnsthe maximal squarefree divisor of the poly f43 further_hn_proc(); show further procedures useful for interactive use44 45 KEYWORDS: Hamburger-Noether expansion; curve singularities35 puiseux2generators(m,n); convert Puiseux pairs to generators of semigroup 36 multiplicities(hne); multiplicities of blowed up curves 37 separateHNE(hne1,hne2); number of quadratic transf. needed for separation 38 squarefree(f); a squarefree divisor of the poly f 39 allsquarefree(f,l); the maximal squarefree divisor of the poly f 40 further_hn_proc(); show further procedures useful for interactive use 41 42 KEYWORDS: Hamburger-Noether expansion; Puiseux expansion; curve singularities 46 43 "; 47 44 ///////////////////////////////////////////////////////////////////////////////
Note: See TracChangeset
for help on using the changeset viewer.