Changeset 01cda73 in git


Ignore:
Timestamp:
Jul 28, 2009, 4:17:00 PM (15 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '648d28f488f6ff08f5607ff229b9ad9e4a5b93c2')
Children:
d3e63080067b404bb6735cd99263a8ca6d413ed4
Parents:
40db068acd2f944f37ff293b6e23465dfa9d9765
Message:
*hannes: Namespaces by default


git-svn-id: file:///usr/local/Singular/svn/trunk@12028 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Singular/LIB
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/classify.lib

    r40db06 r01cda73  
    11// KK,GMG last modified: 17.12.00
    22///////////////////////////////////////////////////////////////////////////////
    3 version  = "$Id: classify.lib,v 1.56 2009-04-15 11:11:11 seelisch Exp $";
     3version  = "$Id: classify.lib,v 1.57 2009-07-28 14:17:00 Singular Exp $";
    44category="Singularities";
    55info="
     
    7878  def ring_ext = basering;
    7979
    80   if(system("with","Namespaces")) {
    81     if(defined(A_Z)==0) { proc A_Z = general_lib::A_Z; export A_Z; }
    82   }
     80  // Namespaces:
     81  if(defined(A_Z)==0) { proc A_Z = general_lib::A_Z; export A_Z; }
    8382  init_debug();                    // initialize trace/debug mode
    8483  if(checkring()) { return(f_in); }
  • Singular/LIB/deform.lib

    r40db06 r01cda73  
    1 // $Id: deform.lib,v 1.37 2006-07-31 09:11:10 Singular Exp $
     1// $Id: deform.lib,v 1.38 2009-07-28 14:17:00 Singular Exp $
    22// author: Bernd Martin email: martin@math.tu-cottbus.de
    33//(bm, last modified 4/98)
    44///////////////////////////////////////////////////////////////////////////////
    5 version="$Id: deform.lib,v 1.37 2006-07-31 09:11:10 Singular Exp $";
     5version="$Id: deform.lib,v 1.38 2009-07-28 14:17:00 Singular Exp $";
    66category="Singularities";
    77info="
     
    574574  br = my+"Sx";
    575575  if (defined(`br`)) { kill `br`}
    576   if(system("with","Namespaces"))
    577   {
    578     br = my+"Qx";
    579     if (defined(Top::`br`)) { kill Top::`br`;}
    580     br = my+"Ox";
    581     if (defined(Top::`br`)) { kill Top::`br`;}
    582     br = my+"Px";
    583     if (defined(Ring::`br`)) { kill Ring::`br`;}
    584     br = my+"So";
    585     if (defined(Ring::`br`)) { kill Ring::`br`;}
    586   }
     576  //Namespaces:
     577  br = my+"Qx";
     578  if (defined(Top::`br`)) { kill Top::`br`;}
     579  br = my+"Ox";
     580  if (defined(Top::`br`)) { kill Top::`br`;}
     581  br = my+"Px";
     582  if (defined(Ring::`br`)) { kill Ring::`br`;}
     583  br = my+"So";
     584  if (defined(Ring::`br`)) { kill Ring::`br`;}
    587585  if (defined(basering)==0)
    588586  { "// choose new basering?";
    589     if(system("with","Namespaces")) { listvar(Top,ring); }
    590     else { listvar(ring); }
     587    listvar(Top,ring);
    591588  }
    592589  return();
     
    958955   intvec dv;
    959956   int l = homog(A) ;
    960    if (l==0) {
     957   if (l==0)
     958   {
    961959     setring br;
    962      if(system("with","Namespaces")) { kill Top::nr; }
     960     kill Top::nr;
    963961     if (defined(nr)) { kill nr; }
    964962     return(l);
     
    969967   dv = dv-l;
    970968 setring br;
    971    if(system("with","Namespaces")) { kill Top::nr; }
     969   kill Top::nr;
    972970   if (defined(nr)) { kill nr; }
    973971   return(dv);
  • Singular/LIB/general.lib

    r40db06 r01cda73  
    33//eric, added absValue 11.04.2002
    44///////////////////////////////////////////////////////////////////////////////
    5 version="$Id: general.lib,v 1.65 2009-07-28 10:34:55 Singular Exp $";
     5version="$Id: general.lib,v 1.66 2009-07-28 14:17:00 Singular Exp $";
    66category="General purpose";
    77info="
     
    345345"
    346346{
    347   if (system("with","Namespaces"))
    348   {
    349     list @marie=names(Top);
    350   }
    351   else
    352   {
    353     list @marie=names();
    354   }
     347  list @marie=names(Top);
    355348  int j, no_kill, @joni;
    356349  for ( @joni=1; @joni<=size(#);  @joni++)
     
    393386          if (!defined(@joni)) break;
    394387        }
    395         if ((system("with","Namespaces")) && defined(General))
     388        if (defined(General))
    396389        {
    397390          @marie=names(General);
  • Singular/LIB/gmssing.lib

    r40db06 r01cda73  
    11///////////////////////////////////////////////////////////////////////////////
    2 version="$Id: gmssing.lib,v 1.15 2009-07-28 10:34:55 Singular Exp $";
     2version="$Id: gmssing.lib,v 1.16 2009-07-28 14:17:00 Singular Exp $";
    33category="Singularities";
    44
     
    195195  attrib(gmsstd,"isSB",1);
    196196  export gmspoly,gmsjacob,gmsstd,gmsmatrix,gmsbasis,gmsmaxdeg;
    197   if (system("with","Namespaces")) { exportto(Top, gmsmaxdeg);}
    198   else { export(gmsmaxdeg);}
     197  exportto(Top, gmsmaxdeg);
    199198
    200199  return(G);
Note: See TracChangeset for help on using the changeset viewer.