Changeset 741c669 in git


Ignore:
Timestamp:
Mar 18, 2008, 4:51:41 PM (16 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '45e267b9942dec9429fe249ce3e5e44ab80a6a3a')
Children:
bdefb2801c2a630fe9bc42a5f5c7762b7a410707
Parents:
91c7192ba9ba1fae4324fc07376c3bf1204bb3a8
Message:
*hannes: reserved word sqrfree


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/rootsmr.lib

    r91c7192 r741c669  
    1 // $Id: rootsmr.lib,v 1.3 2006-12-18 18:36:24 Singular Exp $
     1// $Id: rootsmr.lib,v 1.4 2008-03-18 15:51:41 Singular Exp $
    22// E. Tobis  12.Nov.2004, April 2004
    33// last change 7. May 2005 (G.-M. Greuel)
     
    507507{
    508508  int pr = printlevel - voice + 2;
    509   poly sqrfree;
     509  poly sqr_free;
    510510  int correct;
    511511  poly variable;
     
    516516
    517517  variable = isuni(p);
    518   sqrfree = p/gcd(p,diff(p,variable));
    519   correct = (mat_rk(matbil(1,b,i)) == deg(sqrfree));
     518  sqr_free = p/gcd(p,diff(p,variable));
     519  correct = (mat_rk(matbil(1,b,i)) == deg(sqr_free));
    520520
    521521  if (correct) {
Note: See TracChangeset for help on using the changeset viewer.