Changeset a269e4 in git


Ignore:
Timestamp:
May 2, 2000, 4:52:48 PM (24 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
a86d4c7d13239aa82c534e225bfb3616f3ff2f13
Parents:
bef2933b4e7f52fd7c2878bbdeb21a1a550dd7ac
Message:
*hannes: fixed typ matix


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/finvar.lib

    rbef293 ra269e4  
    1 // $Id: finvar.lib,v 1.25 1999-12-13 15:53:37 obachman Exp $
     1// $Id: finvar.lib,v 1.26 2000-05-02 14:52:48 Singular Exp $
    22// author: Agnes Eileen Heydtmann, email:agnes@math.uni-sb.de
    33// last change: 98/11/05
    44///////////////////////////////////////////////////////////////////////////////
    5 version="$Id: finvar.lib,v 1.25 1999-12-13 15:53:37 obachman Exp $"
     5version="$Id: finvar.lib,v 1.26 2000-05-02 14:52:48 Singular Exp $"
    66info="
    77LIBRARY:  finvar.lib       LIBRARY TO CALCULATE INVARIANT RINGS OF FINITE GROUPS
     
    52895289          }
    52905290          else
    5291           { matix S=secondary_no_molien(l[1],L[1],v);
     5291          { matrix S=secondary_no_molien(l[1],L[1],v);
    52925292          }
    52935293          return(l[1],S);
     
    53125312    { list l=primary_char0_no_molien(L[1],v);
    53135313      if (size(l)==2)
    5314       { matix S=secondary_no_molien(l[1],L[1],l[2],v);
     5314      { matrix S=secondary_no_molien(l[1],L[1],l[2],v);
    53155315      }
    53165316      else
    5317       { matix S=secondary_no_molien(l[1],L[1],v);
     5317      { matrix S=secondary_no_molien(l[1],L[1],v);
    53185318      }
    53195319      return(l[1],S);
     
    53235323      { list l=primary_charp_no_molien(L[1],v); // case
    53245324        if (size(l)==2)
    5325         { matix S=secondary_no_molien(l[1],L[1],l[2],v);
     5325        { matrix S=secondary_no_molien(l[1],L[1],l[2],v);
    53265326        }
    53275327        else
    5328         { matix S=secondary_no_molien(l[1],L[1],v);
     5328        { matrix S=secondary_no_molien(l[1],L[1],v);
    53295329        }
    53305330        return(l[1],S);
     
    55215521          list l=primary_charp_no_molien_random(L[1],max,v);
    55225522          if (size(l)==2)
    5523           { matix S=secondary_no_molien(l[1],L[1],l[2],v);
     5523          { matrix S=secondary_no_molien(l[1],L[1],l[2],v);
    55245524          }
    55255525          else
    5526           { matix S=secondary_no_molien(l[1],L[1],v);
     5526          { matrix S=secondary_no_molien(l[1],L[1],v);
    55275527          }
    55285528          return(l[1],S);
     
    55475547    { list l=primary_char0_no_molien_random(L[1],max,v);
    55485548      if (size(l)==2)
    5549       { matix S=secondary_no_molien(l[1],L[1],l[2],v);
     5549      { matrix S=secondary_no_molien(l[1],L[1],l[2],v);
    55505550      }
    55515551      else
    5552       { matix S=secondary_no_molien(l[1],L[1],v);
     5552      { matrix S=secondary_no_molien(l[1],L[1],v);
    55535553      }
    55545554      return(l[1],S);
     
    55585558      { list l=primary_charp_no_molien_random(L[1],max,v); // case
    55595559        if (size(l)==2)
    5560         { matix S=secondary_no_molien(l[1],L[1],l[2],v);
     5560        { matrix S=secondary_no_molien(l[1],L[1],l[2],v);
    55615561        }
    55625562        else
    5563         { matix S=secondary_no_molien(l[1],L[1],v);
     5563        { matrix S=secondary_no_molien(l[1],L[1],v);
    55645564        }
    55655565        return(l[1],S);
Note: See TracChangeset for help on using the changeset viewer.