Changeset 20f2239 in git for Singular/LIB/classifyceq.lib
- Timestamp:
- May 15, 2020, 9:38:32 PM (4 years ago)
- Branches:
- (u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')
- Children:
- 417a505a76f1137fb518b138cd109cc196892108
- Parents:
- 1891fdca7cd3ff90403d60c1fe5e78ea9219f02c
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/classifyceq.lib
r1891fd r20f2239 560 560 { 561 561 // input poly p 562 // output The normal form to which f is contact equ valent or the function is not simple.562 // output The normal form to which f is contact equivalent or the function is not simple. 563 563 def R=basering; 564 564 int t=tjurina(p); … … 822 822 if(size(lengthBL(f))==4) 823 823 { 824 ret run("The given function defines an isolated Singularity.824 return("The given function defines an isolated Singularity. 825 825 The Tjurina number is "+string(tjurina(f))+". 826 826 E^0[7]:z2+x3+xy3."); … … 1113 1113 /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// 1114 1114 static proc whichSUR(poly f) 1115 //====This procedure is required to separate the Surface Case D_2m from D_2m+1 as d iscribes in [2].1115 //====This procedure is required to separate the Surface Case D_2m from D_2m+1 as describes in [2]. 1116 1116 { 1117 1117 int d=tjurina(f);
Note: See TracChangeset
for help on using the changeset viewer.