Changeset 960f2a in git


Ignore:
Timestamp:
Jul 23, 1997, 7:51:41 PM (27 years ago)
Author:
Kai Krüger <krueger@…>
Branches:
(u'spielwiese', '82fc009ea2b0098c1a4896c841bb70860976bdfc')
Children:
c1237215dc013f8133d4807ad6f5ba087e7f48b9
Parents:
95d5c608e097fb2e4b27e6ab645ceba80a0a64d1
Message:
*** empty log message ***


git-svn-id: file:///usr/local/Singular/svn/trunk@575 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/classify.lib

    r95d5c6 r960f2a  
    1 // $Id: classify.lib,v 1.5 1997-01-24 10:23:07 krueger Exp $
     1// $Id: classify.lib,v 1.6 1997-07-23 17:51:41 krueger Exp $
    22//=============================================================================
    33//
     
    66//=============================================================================
    77// required libraries
    8 //LIB "lib0";
    9 //LIB "lib1";
     8
    109LIB "lib_Setring";
    1110LIB "lib_ReOrder";
     
    4140    "          poly g=Classify(f); ";
    4241    "";
    43     " REMARK:  This version of Classify is only pre-alpha.";
     42    " REMARK:  This version of Classify is only alpha.";
    4443    "          Please send bugs and comments to: ";
    4544    "          \"Kai Krueger\" <krueger@mathematik.uni-kl.de>";
     
    4746    "          int DeBug=1; is usefull as trace-mode. For more informations";
    4847    "          increace the value of \'DeBug\'";
     48    "          or set the shell-variable SG_DEBUG to the debugging level.";
    4949//=============================================================================
    5050    return();
     
    7575
    7676  // if trace/debug mode not set, do it!
    77   if( defined(DeBug) == 0) {
    78     string s=system("getenv", "SG_DEBUG");
    79     if( s != "" ) {
    80       s="int DeBug="+s;
    81       execute s;
    82     }
    83     else { int DeBug = 0; }
    84   }
    85   export DeBug;
     77  init_debug();
    8678
    8779  // define new ring
     
    116108  @s4 = "poly @f_out="+@s1+";";
    117109//"Corang:"+ string(CoRang);
     110"S1=", @s1;
     111"S2=", @s2;
    118112
    119113  if( @s2[1,2]=="f " || @s2[1,4]=="The " || @s2=="Fehler!" || @s2=="A[0]") {
     
    134128  }
    135129//"Corang:"+ string(CoRang);
    136 
    137130  if(@show_nf==1) {
    138131    poly @f_nf = NormalForm(@s2);
Note: See TracChangeset for help on using the changeset viewer.