Changeset a269e4 in git
- Timestamp:
- May 2, 2000, 4:52:48 PM (23 years ago)
- Branches:
- (u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
- Children:
- a86d4c7d13239aa82c534e225bfb3616f3ff2f13
- Parents:
- bef2933b4e7f52fd7c2878bbdeb21a1a550dd7ac
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/finvar.lib
rbef293 ra269e4 1 // $Id: finvar.lib,v 1.2 5 1999-12-13 15:53:37 obachmanExp $1 // $Id: finvar.lib,v 1.26 2000-05-02 14:52:48 Singular Exp $ 2 2 // author: Agnes Eileen Heydtmann, email:agnes@math.uni-sb.de 3 3 // last change: 98/11/05 4 4 /////////////////////////////////////////////////////////////////////////////// 5 version="$Id: finvar.lib,v 1.2 5 1999-12-13 15:53:37 obachmanExp $"5 version="$Id: finvar.lib,v 1.26 2000-05-02 14:52:48 Singular Exp $" 6 6 info=" 7 7 LIBRARY: finvar.lib LIBRARY TO CALCULATE INVARIANT RINGS OF FINITE GROUPS … … 5289 5289 } 5290 5290 else 5291 { mat ix S=secondary_no_molien(l[1],L[1],v);5291 { matrix S=secondary_no_molien(l[1],L[1],v); 5292 5292 } 5293 5293 return(l[1],S); … … 5312 5312 { list l=primary_char0_no_molien(L[1],v); 5313 5313 if (size(l)==2) 5314 { mat ix S=secondary_no_molien(l[1],L[1],l[2],v);5314 { matrix S=secondary_no_molien(l[1],L[1],l[2],v); 5315 5315 } 5316 5316 else 5317 { mat ix S=secondary_no_molien(l[1],L[1],v);5317 { matrix S=secondary_no_molien(l[1],L[1],v); 5318 5318 } 5319 5319 return(l[1],S); … … 5323 5323 { list l=primary_charp_no_molien(L[1],v); // case 5324 5324 if (size(l)==2) 5325 { mat ix S=secondary_no_molien(l[1],L[1],l[2],v);5325 { matrix S=secondary_no_molien(l[1],L[1],l[2],v); 5326 5326 } 5327 5327 else 5328 { mat ix S=secondary_no_molien(l[1],L[1],v);5328 { matrix S=secondary_no_molien(l[1],L[1],v); 5329 5329 } 5330 5330 return(l[1],S); … … 5521 5521 list l=primary_charp_no_molien_random(L[1],max,v); 5522 5522 if (size(l)==2) 5523 { mat ix S=secondary_no_molien(l[1],L[1],l[2],v);5523 { matrix S=secondary_no_molien(l[1],L[1],l[2],v); 5524 5524 } 5525 5525 else 5526 { mat ix S=secondary_no_molien(l[1],L[1],v);5526 { matrix S=secondary_no_molien(l[1],L[1],v); 5527 5527 } 5528 5528 return(l[1],S); … … 5547 5547 { list l=primary_char0_no_molien_random(L[1],max,v); 5548 5548 if (size(l)==2) 5549 { mat ix S=secondary_no_molien(l[1],L[1],l[2],v);5549 { matrix S=secondary_no_molien(l[1],L[1],l[2],v); 5550 5550 } 5551 5551 else 5552 { mat ix S=secondary_no_molien(l[1],L[1],v);5552 { matrix S=secondary_no_molien(l[1],L[1],v); 5553 5553 } 5554 5554 return(l[1],S); … … 5558 5558 { list l=primary_charp_no_molien_random(L[1],max,v); // case 5559 5559 if (size(l)==2) 5560 { mat ix S=secondary_no_molien(l[1],L[1],l[2],v);5560 { matrix S=secondary_no_molien(l[1],L[1],l[2],v); 5561 5561 } 5562 5562 else 5563 { mat ix S=secondary_no_molien(l[1],L[1],v);5563 { matrix S=secondary_no_molien(l[1],L[1],v); 5564 5564 } 5565 5565 return(l[1],S);
Note: See TracChangeset
for help on using the changeset viewer.