> < ^ Date: Mon, 09 Jul 2001 18:56:20 +0900
> < ^ From: Katsushi Waki <slwaki@cc.hirosaki-u.ac.jp >
> ^ Subject: How to get C-MeatAxe data

Dear Forum,

Are there any function to save GModule data as a C-Meat Axe read-able file ?

I need to use C-Meat Axe because

1. I want to calculate socle series of GModule.
2. I want to calculate a big GModule.

I just made a following little program. But this program is not good
for a GModule over non-prime field.

Thank you.

##############################################
#
# Gap2MTX(<m>, <name> )
#
# This function make data file for C-Meat Axe from GModule.
#
#	m : GModle
#	name : the name of representation
#
Gap2MTX:=function( m, name)

local k, q, w, gen, n, repr_idx, file_name, i, j;

 k:=m.field;
 q:=Size(k);
 w:=m.dimension;
 gen:=m.generators;
 n:=Length(gen);
#
 for repr_idx in [1..n] do
#
  file_name:=Concatenation(name,".",String(repr_idx));
  PrintTo(file_name,"MeatAxeFileInfo:=\"matrix field=",q," rows=",w," cols=",w,"\"\n");
  for i in [1..w] do
    for j in [1..w] do
      AppendTo(file_name,IntFFE(gen[repr_idx][i][j]));
    od;
    AppendTo(file_name,"\n");
  od;
#
 od;
end;
# 
#  Use zcv to get binary MTX data.
#
Katsushi Waki           + Hirosaki University, Japan +

Miles-Receive-Header: reply


> < [top]