Changeset c99fd4 in git for Singular/LIB/noether.lib


Ignore:
Timestamp:
Oct 6, 2008, 7:04:28 PM (15 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
Children:
886b0dae50b58b9f8b0863c63abf2f0ddacf9a26
Parents:
100025a806c37776e35dd4b839e192304f203af8
Message:
*hannes/gmg: elim, select, nselect, select1


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/noether.lib

    r100025 rc99fd4  
    11// AH last modified:  01.07.2007
    22//////////////////////////////////////////////////////////////////////////////
    3 version = "$Id: noether.lib,v 1.10 2008-04-11 14:04:40 Singular Exp $";
     3version = "$Id: noether.lib,v 1.11 2008-10-06 17:04:28 Singular Exp $";
    44category="Commutative Algebra";
    55info="
     
    199199    for ( ii = n; ii>=0; ii-- )
    200200    {
    201       chcoord=select1(maxideal(1),1,(ii));
     201      chcoord=select1(maxideal(1),1..ii);
    202202      ran=random(100,1,ii);
    203203      ran=intmat(ran,1,ii+1);
    204204      ran[1,ii+1]=1;
    205       m=select1(maxideal(1),1,(ii+1));
     205      m=select1(maxideal(1),1..(ii+1));
    206206      for ( jj = 1; jj<=ii+1; jj++ )
    207207      {
     
    279279     for ( ii = n; ii>=0; ii-- )
    280280     {
    281        chcoord=select1(maxideal(1),1,(ii));
     281       chcoord=select1(maxideal(1),1..ii);
    282282       ran=random(100,1,ii);
    283283       ran=intmat(ran,1,ii+1);
    284284       ran[1,ii+1]=1;
    285        m=select1(maxideal(1),1,(ii+1));
     285       m=select1(maxideal(1),1..(ii+1));
    286286       for ( jj = 1; jj<=ii+1; jj++ )
    287287       {
     
    384384  {
    385385    nl=nl+1;
    386     chcoord=select1(maxideal(1),1,(n));
     386    chcoord=select1(maxideal(1),1..n);
    387387    ran=random(100,1,n);
    388388    ran=intmat(ran,1,n+1);
    389389    ran[1,n+1]=1;
    390     m=select1(maxideal(1),1,(n+1));
     390    m=select1(maxideal(1),1..(n+1));
    391391    for ( jj = 1; jj<=n+1; jj++ )
    392392    {
     
    479479  {
    480480    nl=nl+1;
    481     chcoord=select1(maxideal(1),1,(n));
     481    chcoord=select1(maxideal(1),1..n);
    482482    ran=random(100,1,n);
    483483    ran=intmat(ran,1,n+1);
    484484    ran[1,n+1]=1;
    485     m=select1(maxideal(1),1,(n+1));
     485    m=select1(maxideal(1),1..(n+1));
    486486    for ( jj = 1; jj<=n+1; jj++ )
    487487    {
Note: See TracChangeset for help on using the changeset viewer.