Changeset b33f45b in git
- Timestamp:
- May 6, 2005, 7:17:01 PM (18 years ago)
- Branches:
- (u'spielwiese', '91fdef05f09f54b8d58d92a472e9c4a43aa4656f')
- Children:
- 2ef2807cca84d4525c98ab053018ffb31afd48b3
- Parents:
- 47f15be07410d04582b5a0594f5e710082c6254d
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/alexpoly.lib
r47f15b rb33f45b 1 version="$Id: alexpoly.lib,v 1.1 0 2005-05-06 17:07:34Singular Exp $";1 version="$Id: alexpoly.lib,v 1.11 2005-05-06 17:17:01 Singular Exp $"; 2 2 category="Singularities"; 3 3 info=" … … 23 23 charexp2conductor(v); converts characteristic exponents to conductor 24 24 charexp2poly(v,a); calculates a polynomial f with characteristic exponents v 25 tau_es (f);equisingular Tjurina number of f25 tau_es2(f); equisingular Tjurina number of f 26 26 27 27 KEYWORDS: Hamburger-Noether expansion; Puiseux expansion; curve singularities; … … 1403 1403 } 1404 1404 1405 proc tau_es (def INPUT, list #)1406 "USAGE: tau_es (INPUT); INPUT poly or list1405 proc tau_es2 (def INPUT, list #) 1406 "USAGE: tau_es2(INPUT); INPUT poly or list 1407 1407 ASSUME: INPUT is either a REDUCED bivariate polynomial defining a plane curve singularity, 1408 1408 or the output of @code{hnexpansion(f[,\"ess\"])}, or the list @code{hne} in … … 1423 1423 If you are not sure whether the INPUT polynomial is reduced or not, use 1424 1424 @code{squarefree(INPUT)} as input instead. 1425 SEE ALSO: develop, hnexpansion, totalmultiplicities, equising.lib1426 EXAMPLE: example tau_es ; shows an example1425 SEE ALSO: tau_es, develop, hnexpansion, totalmultiplicities, equising.lib 1426 EXAMPLE: example tau_es2; shows an example 1427 1427 " 1428 1428 { … … 1575 1575 poly f2=(y2-x3)^2-4x5y-x7; 1576 1576 poly f3=y3-x2; 1577 tau_es (f1);1578 tau_es (f2);1579 tau_es (f1*f2*f3);1577 tau_es2(f1); 1578 tau_es2(f2); 1579 tau_es2(f1*f2*f3); 1580 1580 } 1581 1581
Note: See TracChangeset
for help on using the changeset viewer.