Changeset dc5e5b in git


Ignore:
Timestamp:
Apr 28, 2005, 11:23:17 AM (19 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'd25190065115c859833252500a64cfb7b11e3a50')
Children:
bf801507fe105954de296fd0a5ca0d803af6ba2f
Parents:
daa83bcd8a2f618d74ab2877569d0c88d17bece7
Message:
*lossen: keepring/ fix


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/gmspoly.lib

    rdaa83b rdc5e5b  
    11///////////////////////////////////////////////////////////////////////////////
    2 version="$Id: gmspoly.lib,v 1.8 2004-08-10 17:03:44 mschulze Exp $";
     2version="$Id: gmspoly.lib,v 1.9 2005-04-28 09:23:17 Singular Exp $";
    33category="Singularities";
    44
     
    88AUTHOR:   Mathias Schulze, email: mschulze@mathematik.uni-kl.de
    99
    10 OVERVIEW: A library to compute invariants related to the the Gauss-Manin system
     10OVERVIEW: A library to compute invariants related to the Gauss-Manin system
    1111          of a cohomologically tame polynomial
    1212
     
    5656proc istame(poly f)
    5757"USAGE:    istame(f); poly f
     58ASSUME: basering has no variables named w(1),w(2),...
    5859RETURN:
    5960@format
     
    6970  def @X=basering;
    7071  int n=nvars(@X);
    71   changechar("@WX","(0,w(1.."+string(n)+"))");
     72  def @WX=changechar("(0,w(1.."+string(n)+"))");
     73  setring @WX;
    7274  ideal J=jacob(imap(@X,f));
    73 
     75~
    7476  int i;
    7577  for(i=1;i<=n;i++)
Note: See TracChangeset for help on using the changeset viewer.