Changeset 21fd93 in git for Singular/LIB/classify.lib
- Timestamp:
- Nov 5, 1999, 4:12:24 PM (24 years ago)
- Branches:
- (u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
- Children:
- 0a61ade6e7f3bac9e3585cb4ce421aa9f247f30d
- Parents:
- eedab2da10a67a652d6ceaec8f3eda75972de883
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/classify.lib
reedab2 r21fd93 1 e// $Id: classify.lib,v 1.3 7 1999-09-03 15:17:01 kruegerExp $1 e// $Id: classify.lib,v 1.38 1999-11-05 15:12:24 obachman Exp $ 2 2 // KK, last modified: 04.04.1998 3 3 /////////////////////////////////////////////////////////////////////////////// 4 4 5 version = "$Id: classify.lib,v 1.3 7 1999-09-03 15:17:01 kruegerExp $";5 version = "$Id: classify.lib,v 1.38 1999-11-05 15:12:24 obachman Exp $"; 6 6 info=" 7 7 LIBRARY: classify.lib PROCEDURES FOR THE ARNOLD-CLASSIFIER OF SINGULARITIES … … 1447 1447 if( @DeBug >= 0 ) { 1448 1448 "The singularity"; 1449 " `"+Show(jet(f, K))+"'";1449 " "+Show(jet(f, K))+""; 1450 1450 if( typ != "error!" && typ != "NoClass" ) { 1451 1451 "is R-equivalent to "+typ+"."; … … 1469 1469 int Mu = cstn[2]; 1470 1470 int K = cstn[3]; 1471 string s = "The Singularity '";+Show(jet(f, K), corank, K);1471 string s = "The Singularity ";+Show(jet(f, K), corank, K); 1472 1472 string tp=""; 1473 1473 // return(printresult(47, f, tp, cstn, -1)); 1474 1474 1475 s = s +" 'has 4-jet equal to zero. (F47), mu="+string(Mu);1475 s = s +" has 4-jet equal to zero. (F47), mu="+string(Mu); 1476 1476 1477 1477 s; // +" ("+SG_Typ+")"; … … 2407 2407 if(crk==1) { f = f + y2 + z2; } 2408 2408 if(crk==2) { f = f + z2; } 2409 txt="RandomPoly-Series: gewaehlt fall `"+Typ+"'mit";2409 txt="RandomPoly-Series: gewaehlt fall "+Typ+" mit"; 2410 2410 txt=txt+" f="+string(f); 2411 2411 txt;
Note: See TracChangeset
for help on using the changeset viewer.