10 #ifndef MEATAXE_H_INCLUDED
11 #define MEATAXE_H_INCLUDED
17 #define MTX_PRINTF_ATTRIBUTE(f,v) __attribute__((format(printf,f,v)))
19 #define MTX_PRINTF_ATTRIBUTE(f,v)
27 #define FM_CREATE 0x02
28 #define FM_APPEND 0x03
31 #define FM_NOERROR 0x40
40 FILE *
SysFopen(
const char *name,
int mode);
46 #define SysReadLong SysReadLong32
47 int SysReadLongX(FILE *f,
long *buf,
int n);
53 #define SysWriteLong SysWriteLong32
54 int SysWriteLongX(FILE *f,
const long *buf,
int n);
56 #define ALLOC(type) ((type *) SysMalloc(sizeof(type)))
57 #define NALLOC(type,n) ((type *) SysMalloc((size_t)(n) * sizeof(type)))
58 #define NREALLOC(x,type,n)\
59 ((type *) SysRealloc(x,(size_t)(n) * sizeof(type)))
60 #define FREE(x) SysFree(x)
78 typedef unsigned char FEL;
80 #define FF_ZERO ((FEL)0)
81 #define FF_ONE ((FEL)1)
86 typedef unsigned short FEL;
87 typedef unsigned short *
PTR;
88 #define FF_ZERO ((FEL)0xFFFF)
89 #define FF_ONE ((FEL)0)
90 #define ZZZVERSION 0x101
94 #error "ZZZ undefined"
119 int FfMakeTables(
int field);
147 FILE *
FfReadHeader(
const char *name,
int *fld,
int *nor,
int *noc);
158 FILE *
FfWriteHeader(
const char *name,
int fld,
int nor,
int noc);
175 extern FEL mtx_tnull[8][256];
177 extern long mtx_embedord[4];
178 extern FEL mtx_embed[4][16];
179 extern FEL mtx_restrict[4][256];
181 #define FfAdd(a,b) ((FEL)mtx_tadd[(int)(unsigned char)a][(int)(unsigned char)b])
182 #define FfDiv(a,b) FfMul((a),FfInv(b))
183 #define FfInv(a) (mtx_tmultinv[(int)(unsigned char)a])
184 #define FfMul(a,b) ((FEL)mtx_tmult[(int)(unsigned char)a][(int)(unsigned char)b])
185 #define FfNeg(a) (mtx_taddinv[(int)(unsigned char)a])
186 #define FfSub(a,b) FfAdd((a),FfNeg(b))
190 #define FfExtract(row,col) ((FEL)((row)[(col)-1]))
191 #define FfInsert(row,col,mark) ((void)((row)[(col)-1] = mark))
211 extern int Mtx_IsInitialized;
212 extern int Mtx_IsX86;
213 extern int MtxOpt_UseOldWordGenerator;
215 int MtxInitLibrary();
216 void MtxCleanupLibrary();
239 MTX_PRINTF_ATTRIBUTE(2,3)
241 MTX_PRINTF_ATTRIBUTE(2,3)
261 #define APP_MAX_ARGS 50
306 unsigned long IsDone[APP_MAX_ARGS];
309 char TempDirName[200];
324 #define MTX_COMMON_OPTIONS_SYNTAX \
327 #define MTX_COMMON_OPTIONS_DESCRIPTION \
328 " -Q ...................... Quiet, no messages\n" \
329 " -V ...................... Verbose, more messages\n" \
330 " -T <MaxTime> ............ Set CPU time limit [s]\n"
342 #define MTX_ERR_NOMEM 1
343 #define MTX_ERR_GAME_OVER 2
344 #define MTX_ERR_DIV0 8
345 #define MTX_ERR_FILEFMT 24
346 #define MTX_ERR_BADARG 31
347 #define MTX_ERR_RANGE 33
348 #define MTX_ERR_NOTECH 34
349 #define MTX_ERR_NOTSQUARE 35
350 #define MTX_ERR_INCOMPAT 36
351 #define MTX_ERR_BADUSAGE 41
352 #define MTX_ERR_OPTION 42
353 #define MTX_ERR_NARGS 43
354 #define MTX_ERR_NOTMATRIX 51
355 #define MTX_ERR_NOTPERM 53
390 #define MTX_DEFINE_FILE_INFO \
391 static MtxFileInfo_t Mtx_ThisFile = { __FILE__, NULL };
397 #define MTX_ERROR(msg) MtxError(&Mtx_ThisFile,__LINE__,msg)
398 #define MTX_ERROR1(msg,a1) MtxError(&Mtx_ThisFile,__LINE__,msg,a1)
399 #define MTX_ERROR2(msg,a1,a2) MtxError(&Mtx_ThisFile,__LINE__,msg,a1,a2)
400 #define MTX_ERROR3(msg,a1,a2,a3) MtxError(&Mtx_ThisFile,__LINE__,msg,a1,a2,a3)
401 #define MTX_ERROR4(msg,a1,a2,a3,a4) MtxError(&Mtx_ThisFile,__LINE__,\
403 #define MTX_ERROR5(msg,a1,a2,a3,a4,a5) MtxError(&Mtx_ThisFile,__LINE__,\
405 #define MTX_ERROR7(msg,a1,a2,a3,a4,a5,a6,a7) MtxError(&Mtx_ThisFile,__LINE__,\
406 msg,a1,a2,a3,a4,a5,a6,a7)
409 #define MTX_VERIFY(e) ((void)((e) ||\
410 MtxError(&Mtx_ThisFile,__LINE__,"Assertion failed: %s",#e)))
417 #define MTX_ASSERT(e) MTX_VERIFY(e)
419 #define MTX_ASSERT(e)
433 #define MSG0 (MtxMessageLevel >= 0)
434 #define MSG1 (MtxMessageLevel >= 1)
435 #define MSG2 (MtxMessageLevel >= 2)
436 #define MSG3 (MtxMessageLevel >= 3)
437 #define MSG4 (MtxMessageLevel >= 4)
438 #define MESSAGE(level,args)\
439 (MtxMessageLevel>=(level) ? ( printf args , fflush(stdout), 1) : 0 )
451 long gcd(
long a,
long b);
452 long lcm(
long a,
long b);
524 int MfReadLong(
MtxFile_t *f,
long *buf,
int nrows);
526 int MfWriteLong(
MtxFile_t *f,
const long *buf,
int count);
549 const Matrix_t *src,
int row1,
int col1,
int nrows,
int ncols);
667 void Perm_ConvertOld(
long *data,
int len);
764 #define BS_BPL (sizeof(long) * 8)
765 #define BsSet(bs,i) ((bs)->Data[(i) / BS_BPL] |= 1L << ((i) % BS_BPL))
766 #define BsClear(bs,i) ((bs)->Data[(i) / BS_BPL] &= ~(1L << ((i) % BS_BPL)))
767 #define BsTest(bs,i) (((bs)->Data[(i) / BS_BPL] & (1L << ((i) % BS_BPL))) != 0 ? 1 : 0)
791 int SetPrint(
char *name,
const Set_t *s);
820 int XIsCompatible(
void *a,
void *b);
822 void *XInverse(
void *a);
823 void *XLoad(
const char *fn);
824 void XMul(
void *a,
void *b);
825 long XOrder(
void *a);
826 void *XPower(
void *a,
int n);
827 int XSave(
void *a,
const char *fn);
880 #define MR_COPY_GENERATORS 0x0001
921 #define SF_FIRST 0x0001
922 #define SF_EACH 0x0002
923 #define SF_MAKE 0x0004
924 #define SF_SUB 0x0010
925 #define SF_CYCLIC 0x0020
926 #define SF_COMBINE 0x0040
927 #define SF_SEED_MASK 0x000F
928 #define SF_MODE_MASK 0x00F0
929 #define SF_STD 0x0100
937 int MaxSubspaceDimension;
960 long MakeSeedVector(
const Matrix_t *basis,
long lastno,
PTR vec);
1011 #define LAT_MAXCF 200
1012 #define MAXCYCL 30000
1013 #define MAXDOTL 90000
1014 #define MAXNSUB 20000
1015 #define LAT_MAXBASENAME 100
1019 long dim, num, mult;
1032 char BaseName[LAT_MAXBASENAME];
1050 #define LAT_RG_INVERT 0x0001
1051 #define LAT_RG_TRANSPOSE 0x0002
1052 #define LAT_RG_STD 0x0004
1075 char NameM[LAT_MAXBASENAME];
1076 char NameN[LAT_MAXBASENAME];
1079 int CfIndex[2][LAT_MAXCF];
1126 unsigned long UserData;
1144 #define LD_ISSUB(l,i,k) ((l)->IsSub[(i) * (l)->NNodes + (k)])
1148 int LdAddIncidence(
LdLattice_t *lat,
int sub,
int sup);
int OptEnd
Used internally.
Definition: meataxe.h:305
int LPR
Number of marks per byte (depends on field order)
Definition: kernel-0.c:28
void FfPermRow(PTR row, const long *perm, PTR result)
Multiply a Vector by a Permutation.
Definition: zpermrow.c:34
A Permutation.
Definition: meataxe.h:645
int Field
Field order.
Definition: meataxe.h:535
Set_t * SetAlloc()
Create a new set.
Definition: setcore.c:81
void FfSwapRows(PTR dest, PTR src)
Exchange two rows This function exchanges the contents of two rows.
Definition: zzz2.c:145
PTR PrecalcData
Precalculated data.
Definition: meataxe.h:619
int NCf
Number of irred.
Definition: meataxe.h:1035
FEL * Data
Coefficients.
Definition: meataxe.h:684
PTR FfSubRowPartialReverse(PTR dest, PTR src, int first, int len)
Subtract a part of two rows.
Definition: kernel-0.c:877
Matrix_t * MatAdd(Matrix_t *dest, const Matrix_t *src)
Sum of two matrices.
Definition: matadd.c:32
FEL FfFromInt(int l)
Convert integer to field element.
Definition: kernel-0.c:1056
const char * Lat_CfName(const Lat_Info *li, int cf)
Make Constituent Name.
Definition: cfinfo.c:428
int GrMatFree(GreasedMatrix_t *mat)
Free a greased matrix.
Definition: grmatcore.c:84
MtxFile_t * MfOpen(const char *name)
Open a File for Reading.
Definition: mfcore.c:90
Perm_t * PermInverse(const Perm_t *src)
Inverse of a permutation This function calulates the inverse of a permutation.
Definition: perminv.c:33
const char * Description
One-line description of the program.
Definition: meataxe.h:287
int SysFseek(FILE *f, long pos)
Set file pointer.
Definition: os.c:270
int BsClear(BitString_t *bs, int i)
Matrix_t * MatPower(const Matrix_t *mat, long n)
!section obj.mat Power of a matrix.
Definition: matpwr.c:96
FEL mtx_tinsert[8][256]
table for insertion of a mark into a byte
Definition: maketabF.c:39
Graphical lattice representation.
Definition: meataxe.h:1136
const char * Help
Help text.
Definition: meataxe.h:288
int FfReadRows(FILE *f, PTR buf, int n)
Read Rows This function reads 1 or more rows from a file.
Definition: ffio.c:57
int ArgC
Number of arguments.
Definition: meataxe.h:303
char * Name
File name.
Definition: meataxe.h:517
int PermOrder(const Perm_t *perm)
Order of a permutation.
Definition: permorder.c:32
GreasedMatrix_t * GrMatAlloc(const Matrix_t *M, int gr_rows)
Create a greased matrix.
Definition: grmatcore.c:115
int StfMatch(StfData *f, const char *pattern)
Skip text.
Definition: stfread.c:291
const MatRep_t * Rep
The representation.
Definition: meataxe.h:899
void StrFree(String *s)
Free a string.
Definition: string.c:133
Poly_t * PolDerive(Poly_t *pol)
Derive a Polynomial.
Definition: polderive.c:43
void FfExtractColumn(PTR mat, int nor, int col, PTR result)
!section kernel.ff.row Extract one column of a matrix.
Definition: kernel-0.c:1280
int StfWriteInt(StfData *f, const char *name, int value)
Write an Integer.
Definition: stfwrite.c:276
FEL mtx_tmult[256][256]
table for field element multiplication
Definition: maketabF.c:32
int LineNo
Line in which the error is raised.
Definition: meataxe.h:379
int BsFree(BitString_t *bs)
Definition: bscore.c:126
PTR FfSubRowPartial(PTR dest, PTR src, int first, int len)
Subtract a part of two rows.
Definition: kernel-0.c:814
int FfFindPivot(PTR row, FEL *mark)
Find pivot column.
Definition: kernel-0.c:1392
int FfChar
Current characteristic.
Definition: zzz2.c:36
size_t RowSize
Size (in bytes) of one row.
Definition: meataxe.h:539
A set of matrices.
Definition: meataxe.h:855
Poly_t * PolMul(Poly_t *dest, const Poly_t *src)
Multiply Polynomials.
Definition: polmul.c:35
BitString_t * BsRead(FILE *f)
Read a bit string from a file.
Definition: bsread.c:31
int MPB
Number of marks per byte.
Definition: meataxe.h:621
int NumVecs
Total number of vectors in PrecalcData.
Definition: meataxe.h:618
const char * StfGetName(StfData *f)
Get Entry Name.
Definition: stfread.c:93
Matrix_t * MatMulStrassen(Matrix_t *dest, const Matrix_t *A, const Matrix_t *B)
Multiply matrices.
Definition: window.c:1010
Matrix_t * MatMul(Matrix_t *dest, const Matrix_t *src)
Multiply matrices This function multiplies dest from the right by src.
Definition: matmul.c:41
Application information structure.
Definition: meataxe.h:285
int Noc
Number of columns.
Definition: meataxe.h:515
MatRep_t * MrLoad(const char *basename, int ngen)
Load a Matrix Representation.
Definition: mrread.c:40
A greased matrix.
Definition: meataxe.h:611
int Degree
Degree of the polynomial.
Definition: meataxe.h:683
int FfSetField(int field)
Set the field order.
Definition: kernel-0.c:385
int Field
Field order.
Definition: meataxe.h:682
A matrix over a finite field. The Data field is a pointer to the matrix elements, organized as an arr...
Definition: meataxe.h:533
Matrix_t * SpinUp(const Matrix_t *seed, const MatRep_t *rep, int flags, IntMatrix_t **script, SpinUpInfo_t *info)
Spin up.
Definition: spinup.c:576
int * Socle
Mult.
Definition: meataxe.h:1038
int MtxFormatMessage(char *buf, int bufsize, const char *msg, va_list al)
Format a message.
Definition: message.c:164
void MtxRandomInit(unsigned seed)
Initialize the random number generator.
Definition: random.c:49
int FpFree(FPoly_t *x)
Free a Factored Polynomial.
Definition: fpcore.c:133
long idword
Identifying word.
Definition: meataxe.h:1020
int MfClose(MtxFile_t *file)
Close a File.
Definition: mfcore.c:170
int * Mult
Multiplicity of each factor.
Definition: meataxe.h:722
Matrix_t * MatNullSpace(const Matrix_t *mat)
Null-space of a matrix This function calculates the null-space of a matrix.
Definition: matnull.c:195
int StfPutInt(StfData *f, int value)
Write an Integer.
Definition: stfwrite.c:59
long SysTimeUsed(void)
CPU time.
Definition: os.c:104
int PolFree(Poly_t *p)
Free a polynomial" This function frees a polynomial data structure and cleans up all internal data.
Definition: polcore.c:144
Matrix_t * MatNullSpace__(Matrix_t *mat)
Null-space of a matrix This function calculates the null-space of a matrix and deletes the original m...
Definition: matnull.c:224
int PermFree(Perm_t *p)
Free a permutation.
Definition: permcore.c:143
void * SysMalloc(size_t nbytes)
Allocate memory.
Definition: os.c:370
Matrix_t * MatAlloc(int field, int nor, int noc)
Create a new matrix.
Definition: matcore.c:109
FEL mtx_tffirst[256][2]
table for value and index of the first non-zero mark in byte
Definition: maketabF.c:36
FEL * PTR
A pointer to a row vector.
Definition: meataxe.h:79
int FfWriteRows(FILE *f, PTR buf, int n)
Write rows This function writes 1 or more rows to a file.
Definition: ffio.c:95
unsigned char FEL
A finite field element.
Definition: meataxe.h:78
Matrix_t * MatId(int fl, int nor)
Identity matrix This function creates an identity matrix with nor nows over GF(fl).
Definition: matid.c:34
Perm_t * PermRead(FILE *f)
Read a Permutation from a File.
Definition: permread.c:60
const char ** OrigArgV
Original argv from main().
Definition: meataxe.h:302
int AppFree(MtxApplication_t *a)
End an application.
Definition: args.c:414
int BsWrite(BitString_t *bs, FILE *f)
Write a bit string to a file.
Definition: bswrite.c:32
int SysWriteLong32(FILE *f, const long *buf, int n)
Write long integers.
Definition: intio.c:103
void SysSetTimeLimit(long nsecs)
Definition: os.c:175
Definition: meataxe.h:799
Matrix_t * MatTransposed(const Matrix_t *src)
Transpose a matrix.
Definition: mattr.c:27
FPoly_t * MinPol(Matrix_t *mat)
Minimal polynomial.
Definition: minpol.c:266
int PolWrite(const Poly_t *p, FILE *f)
Write a polynomial to a file.
Definition: polwrite.c:58
void Mat_DeletePivotTable(Matrix_t *mat)
Delete the pivot table of a matrix.
Definition: matcore.c:187
File information.
Definition: meataxe.h:364
MatRep_t * Lat_ReadCfGens(Lat_Info *info, int cf, int flags)
Load a Constituent.
Definition: rdcfgen.c:37
Matrix_t * MatTensor(const Matrix_t *m1, const Matrix_t *m2)
Tensor Product.
Definition: mtensor.c:36
void FfFree(PTR x)
Free memory.
Definition: zzz2.c:110
void SysInit(void)
OS-specific initialization.
Definition: os.c:88
StfData * StfOpen(const char *name, int mode)
Open a Structured Text File.
Definition: stfcore.c:133
int StfPut(StfData *f, const char *text)
Write a Raw Value.
Definition: stfwrite.c:32
FEL FfRestrict(FEL a, int subfield)
Restrict to a subfield.
Definition: kernel-0.c:508
MeatAxe data file object.
Definition: meataxe.h:511
Matrix_t * MatMulScalar(Matrix_t *dest, FEL coeff)
Multiply a Matrix by a Constant.
Definition: mmulscal.c:27
BitString_t * BsAlloc(int size)
Create a bit string.
Definition: bscore.c:86
FEL FfScalarProduct(PTR a, PTR b)
Scalar Product of Two Vectors.
Definition: kernel-0.c:1232
Node in a graphical lattice representation.
Definition: meataxe.h:1124
MtxApplicationInfo_t const * AppInfo
Program name and description.
Definition: meataxe.h:300
void * SysRealloc(void *buf, size_t nbytes)
Resize memory block.
Definition: os.c:392
Poly_t * MinPolFactor(Matrix_t *mat)
Minimal Polynomial.
Definition: minpol.c:211
size_t FfRowSize(int noc)
Calculate row size.
Definition: kernel-0.c:444
int Dim
Dimension of condensed module.
Definition: meataxe.h:1077
unsigned long Magic
Used internally.
Definition: meataxe.h:778
int StfBeginEntry(StfData *f, const char *name)
Start a New Entry.
Definition: stfwrite.c:158
PTR FfAlloc(int nor)
Allocate memory and initialize This function allocates a block of memory for a vector (if nrows is 1)...
Definition: zzz2.c:78
int StfWriteVector(StfData *f, const char *name, int size, const int *value)
Write a Vector.
Definition: stfwrite.c:314
Matrix_t * MatDup(const Matrix_t *src)
Duplicate a matrix This function creates a copy of an existing matrix.
Definition: matdup.c:30
FILE * SysFopen(const char *name, int mode)
Open a file.
Definition: os.c:218
int SysFseekRelative(FILE *file, long distance)
Set file pointer relative to current position.
Definition: os.c:356
int NSocles
Loewy length.
Definition: meataxe.h:1037
int FfSeekRow(FILE *f, int pos)
Move to a Row.
Definition: ffio.c:139
Matrix_t * MatCutRows(const Matrix_t *src, int row1, int nrows)
Copy a range of rows of a matrix.
Definition: matcut.c:130
int BsCompare(const BitString_t *a, const BitString_t *b)
Compare two bit strings.
Definition: bsop.c:50
int Size
Number of bits.
Definition: meataxe.h:737
int SysReadLong32(FILE *f, long *buf, int n)
Read long integers.
Definition: intio.c:46
int WgFree(WgData_t *b)
Terminate the word generator.
Definition: wgen.c:467
FEL FfGen
Generator.
Definition: zzz2.c:53
int AppGetOption(MtxApplication_t *app, const char *spec)
Check for command line option.
Definition: args.c:468
FEL mtx_textract[8][256]
table for extraction of a mark from a byte
Definition: maketabF.c:37
Poly_t ** Factor
List of irreducible factors.
Definition: meataxe.h:721
int * PivotTable
Pivot table (if matrix is in echelon form) .
Definition: meataxe.h:540
PTR FfAddRow(PTR dest, PTR src)
Add two rows.
Definition: kernel-0.c:576
int Degree
Degree of the permutation.
Definition: meataxe.h:647
FILE * File
The stream we're using.
Definition: meataxe.h:470
PTR FfSubRow(PTR dest, PTR src)
Subtract two rows.
Definition: kernel-0.c:724
IntMatrix_t * ImatAlloc(int nor, int noc)
Create a New Integer Matrix.
Definition: imatcore.c:77
A Set of Integers. The Set_t structure represents a set of (long) integers. Internally,...
Definition: meataxe.h:777
int MtxError(MtxFileInfo_t *fi, int line, const char *text,...)
Signal an error.
Definition: error.c:135
Matrix_t * MatNullSpace_(Matrix_t *mat, int flags)
Null-space of a matrix This function calculates the null-space of a matrix.
Definition: matnull.c:139
FEL FfExtract(PTR row, int col)
!function FfExtract "Extract a mark from a row"
Definition: kernel-0.c:1364
int MrFree(MatRep_t *rep)
Delete a Matrix Representation.
Definition: mrcore.c:221
int PolIsValid(const Poly_t *p)
Check a polynomial.
Definition: polcore.c:58
int Nor
Number of rows.
Definition: meataxe.h:536
void FfCleanRow(PTR row, PTR matrix, int nor, const int *piv)
Clean Row.
Definition: zcleanrow.c:36
int BsAnd(BitString_t *dest, const BitString_t *src)
Intersection of two bit strings.
Definition: bsand.c:32
int GrMatIsValid(const GreasedMatrix_t *mat)
Check a greased matrix.
Definition: grmatcore.c:53
size_t FfCurrentRowSize
Row size.
Definition: kernel-0.c:214
int NHeads
Number of radical layers.
Definition: meataxe.h:1039
int SetFree(Set_t *x)
Destroy a set.
Definition: setcore.c:115
int OutPos
Number of chars in current line (writing only)
Definition: meataxe.h:474
long * Data
Images of 0,1,2,...
Definition: meataxe.h:648
Set_t * SetDup(const Set_t *s)
Duplicate a set.
Definition: setcore.c:134
int Nor
Number of rows.
Definition: meataxe.h:614
int MatClean(Matrix_t *mat, const Matrix_t *sub)
Clean a matrix.
Definition: matclean.c:35
int SetInsert(Set_t *set, long elem)
Insert an element into a set.
Definition: setinsert.c:33
int MrSave(const MatRep_t *rep, const char *basename)
Save a Matrix Representation.
Definition: mrwrite.c:34
int PolSave(const Poly_t *pol, const char *fn)
Write a Polynomial to a File.
Definition: polwrite.c:102
int SysRemoveFile(const char *name)
Remove a file This function deletes a file.
Definition: os.c:287
int SpinUpInfoInit(SpinUpInfo_t *info)
Initialize spin-up parameters.
Definition: spinup.c:629
int * WgDescribeWord(WgData_t *b, long n)
Creates a symbolic description of a word.
Definition: wgen.c:334
int MtxPrintMessage(FILE *f, const char *fmt,...)
Print a message.
Definition: message.c:218
char * S
pointer to NUL terminated string
Definition: meataxe.h:233
void StrAppend(String *s, const char *text)
Appends text to the end of a string.
Definition: string.c:166
Definition: meataxe.h:1031
FEL mtx_tadd[256][256]
table for field element addition
Definition: maketabF.c:33
unsigned long Magic
Used internally.
Definition: meataxe.h:718
long nmount
Number of mountains.
Definition: meataxe.h:1024
int StfWriteString(StfData *f, const char *name, const char *value)
Write a String.
Definition: stfwrite.c:239
Matrix_t * QAction(const Matrix_t *sub, const Matrix_t *gen)
Action on Quotient.
Definition: quotient.c:135
int Lat_WriteInfo(const Lat_Info *li)
Write a Lattice Information File.
Definition: cfinfo.c:312
int Lat_AddHead(Lat_Info *li, int *mult)
Add a Layer to the Radical Series.
Definition: cfinfo.c:476
Definition: meataxe.h:874
int MakeEndomorphisms(const MatRep_t *rep, const Matrix_t *nsp, Matrix_t *endo[])
Calculate the endomorphism ring.
Definition: mkendo.c:67
int LineBufSize
Current buffer size.
Definition: meataxe.h:473
MatrixSet_t * MsAlloc()
Allocate a Matrix Set.
Definition: mscore.c:134
int OptInd
Used internally.
Definition: meataxe.h:308
void WgMakeFingerPrint(WgData_t *b, int fp[6])
Calculate finger print.
Definition: wgen.c:506
int PolCompare(const Poly_t *a, const Poly_t *b)
Compare Two Plynomials.
Definition: polcmp.c:39
size_t FfTrueRowSize(int noc)
Number of used bytes in a row.
Definition: kernel-0.c:460
long MatNullity__(Matrix_t *mat)
Nullity of a matrix.
Definition: matech.c:169
int ImatFree(IntMatrix_t *mat)
Delete an Integer Matrix.
Definition: imatcore.c:124
long * Data
Marks (row by row).
Definition: meataxe.h:803
void FfCopyRow(PTR dest, PTR src)
Copy a row.
Definition: zzz2.c:127
Perm_t * PermDup(const Perm_t *src)
Duplicate a permutation.
Definition: permdup.c:32
void FfInsert(PTR row, int col, FEL mark)
This function inserts the field element mark at position col into row.
Definition: kernel-0.c:1328
const char ** ArgV
Arguments.
Definition: meataxe.h:304
FEL mtx_tmultinv[256]
table for field element inversion
Definition: maketabF.c:35
FEL mtx_taddinv[256]
table for field element negation
Definition: maketabF.c:34
Matrix_t * MatLoad(const char *fn)
Definition: matread.c:73
unsigned long Magic
Used internally.
Definition: meataxe.h:534
BitString_t * BsCopy(BitString_t *dest, const BitString_t *src)
Copy a bit string.
Definition: bsop.c:70
PTR FfGetPtr(PTR base, int row)
Get row pointer.
Definition: zzz2.c:180
int BsMinus(BitString_t *dest, const BitString_t *src)
Difference of two bit strings.
Definition: bsminus.c:34
int PermCompare(const Perm_t *a, const Perm_t *b)
Compare two permutations.
Definition: permcmp.c:39
String StrAlloc(size_t initial_capacity)
Create a string.
Definition: string.c:119
int MatPivotize(Matrix_t *mat)
Reduce to echelon form.
Definition: matpivot.c:72
long MatNullity(const Matrix_t *mat)
Nullity of a matrix.
Definition: matech.c:154
BitString_t * BsDup(const BitString_t *src)
Duplicate a bit string.
Definition: bsdup.c:30
int FfSumAndIntersection(PTR wrk1, int *nor1, int *nor2, PTR wrk2, int *piv)
Sum and Intersection of Two Vector Spaces.
Definition: sumint.c:48
unsigned long Magic
Used internally.
Definition: meataxe.h:736
unsigned long Magic
Used internally.
Definition: meataxe.h:612
Perm_t * PermLoad(const char *fn)
Read a permutation.
Definition: permread.c:105
void PermPrint(const char *name, const Perm_t *perm)
Print a permutation This function prints a permutation on the standard output using cycle notation.
Definition: permprint.c:44
void FfMulRow(PTR row, FEL mark)
Multiply a row by a coefficient.
Definition: kernel-0.c:986
void StrPrintF(String *s, const char *fmt,...)
snprintf() replacement.
Definition: string.c:248
Perm_t * PermAlloc(int deg)
Allocate a permutation This function creates a permutation of the specified degree.
Definition: permcore.c:101
int MatFree(Matrix_t *mat)
Delete a matrix.
Definition: matcore.c:205
int BufSize
Used internally for memory management.
Definition: meataxe.h:780
Poly_t * CharPolFactor(const Matrix_t *mat)
Characteristic Polynomial.
Definition: charpol.c:219
A dynamic string.
Definition: meataxe.h:232
int Field
Field order or type id.
Definition: meataxe.h:513
int AppGetCountedOption(MtxApplication_t *app, const char *spec)
Count repeatable command line option.
Definition: args.c:494
int MatOrder(const Matrix_t *mat)
Order of a matrix.
Definition: matorder.c:38
int ImatWrite(const IntMatrix_t *mat, FILE *f)
Write an integer matrix to a file.
Definition: imatwrite.c:30
long CharPolSeed
Seed for Characteristic Polynomial.
Definition: charpol.c:37
int PermWrite(const Perm_t *perm, FILE *f)
Write a Permutation to a File.
Definition: permwrite.c:34
int MtxRandomInt(int max)
Random number.
Definition: random.c:97
IntMatrix_t * ImatRead(FILE *f)
Read an integer matrix from a file.
Definition: imatread.c:30
Poly_t * PolGcd(const Poly_t *a, const Poly_t *b)
Greatest Common Divisor of two Polynomials.
Definition: polgcd.c:55
MtxFile_t * MfCreate(const char *name, int field, int nor, int noc)
Open a File for Writing.
Definition: mfcore.c:135
unsigned long Magic
Used internally.
Definition: meataxe.h:512
Application data.
Definition: meataxe.h:299
int TK_ReadInfo(TkData_t *tki, const char *name)
Read a .tki file.
Definition: tkinfo.c:126
Matrix_t * QProjection(const Matrix_t *subspace, const Matrix_t *vectors)
Projection on Quotient.
Definition: quotient.c:57
int StfPutVector(StfData *f, int size, const int *value)
Write a Vector.
Definition: stfwrite.c:107
void Pol_Normalize(Poly_t *p)
Normalize a polynomial.
Definition: polcore.c:161
int * Head
Mult.
Definition: meataxe.h:1040
const char * BaseName
Base name of the file.
Definition: meataxe.h:366
Poly_t * PolAdd(Poly_t *dest, const Poly_t *src)
Add Polynomials.
Definition: poladd.c:63
Matrix_t * VectorToMatrix(Matrix_t *vecs, int n, int noc)
Convert vector to matrix.
Definition: vec2mat.c:41
int BsIsValid(const BitString_t *bs)
Check if a bit string is valid.
Definition: bscore.c:54
Matrix_t * MatInverse(const Matrix_t *src)
Inverse of a matrix This function calculates the inverse of a matrix.
Definition: matinv.c:98
Matrix_t * MatCut(const Matrix_t *src, int row1, int col1, int nrows, int ncols)
Cut a rectangle out of a matrix.
Definition: matcut.c:47
const char * AppGetTextOption(MtxApplication_t *app, const char *spec, const char *dflt)
Check for command line option.
Definition: args.c:521
int StfEndEntry(StfData *f)
End Entry.
Definition: stfwrite.c:180
const MtxFileInfo_t * FileInfo
File that is raising the error.
Definition: meataxe.h:378
void BsPrint(const char *name, const BitString_t *bs)
Print a bit string on stdout.
Definition: bsprint.c:35
int Noc
Number of colums.
Definition: meataxe.h:802
Definition: meataxe.h:717
int StfClose(StfData *f)
Close a Structured Text File.
Definition: stfcore.c:71
int Noc
Number of columns.
Definition: meataxe.h:537
Matrix_t * MatInsert_(Matrix_t *mat, const Poly_t *pol)
Insert a matrix into a polynomial Given a square matrix A and a polynomial p over the same field,...
Definition: matins.c:31
char * LineBuf
Buffers one 'line'.
Definition: meataxe.h:471
char * GetPtr
Current input position.
Definition: meataxe.h:472
FEL FfEmbed(FEL a, int subfield)
Embed a subfield.
Definition: kernel-0.c:479
Definition: meataxe.h:680
long gcd(long a, long b)
Greatest Common Divisor.
Definition: gcd.c:31
const char * WgSymbolicName(WgData_t *b, long n)
Symbolic name of a word.
Definition: wgen.c:257
FPoly_t * FpMulP(FPoly_t *dest, const Poly_t *src, int pwr)
Multiply With an Irreducible Polynomial.
Definition: fpmul.c:36
void PolPrint(char *name, const Poly_t *p)
Print a Polynomial This function prints a polynomial on the standard output in a human-readable form.
Definition: polprint.c:38
int MsIsValid(const MatrixSet_t *set)
Check a Matrix Set.
Definition: mscore.c:64
FPoly_t * FpAlloc()
Allocate a Factored Polynomial.
Definition: fpcore.c:92
Run-time errors.
Definition: meataxe.h:377
int SysGetPid()
Get process id.
Definition: os.c:427
int BsClearAll(BitString_t *bs)
Clear a bit string This function clears all bits in a bit string.
Definition: bsop.c:33
int FfCurrentRowSizeIo
Definition: kernel-0.c:224
long * Data
The elements in ascending order.
Definition: meataxe.h:781
int Noc
Number of columns.
Definition: meataxe.h:615
FILE * FfReadHeader(const char *name, int *fld, int *nor, int *noc)
Open File and Read Header.
Definition: ffio.c:169
int StfReadLine(StfData *f)
Read Next Line.
Definition: stfread.c:35
FILE * FfWriteHeader(const char *name, int fld, int nor, int noc)
Open File and Write Header.
Definition: ffio.c:221
Poly_t * PolLoad(const char *fn)
Read a Polynomial from a File.
Definition: polread.c:115
Perm_t * PermMul(Perm_t *dest, const Perm_t *src)
Multiply permutations.
Definition: permmul.c:35
FILE * File
File to read frmo/write to.
Definition: meataxe.h:516
unsigned long Magic
Used internally.
Definition: meataxe.h:681
void FfMapRow(PTR row, PTR matrix, int nor, PTR result)
Multiply a vector by a matrix.
Definition: kernel-0.c:1093
long lcm(long a, long b)
Least Common Multiple.
Definition: gcd.c:57
int BufSize
Used internally for memory management.
Definition: meataxe.h:686
int MsClean(const MatrixSet_t *set, Matrix_t *mat)
Clean a Matrix with a Matrix Set.
Definition: msclean.c:58
const char * OptArg
Used internally.
Definition: meataxe.h:307
Matrix_t * TensorMap(Matrix_t *vec, const Matrix_t *a, const Matrix_t *b)
Map Under Tensor Product.
Definition: temap.c:40
int Field
Field size.
Definition: meataxe.h:613
int AppGetArguments(MtxApplication_t *app, int min_argc, int max_argc)
Get command line arguments.
Definition: args.c:648
int MrAddGenerator(MatRep_t *rep, Matrix_t *gen, int flags)
Add a Matrix to a Representation.
Definition: mraddgen.c:37
void FfAddMulRowPartial(PTR dest, PTR src, FEL f, int first, int len)
Add a multiple of a part of a row.
Definition: kernel-0.c:944
int MatEchelonize(Matrix_t *mat)
Reduce to echelon form This function performs a Gaussian elimination on the matrix |mat|.
Definition: matech.c:90
int StfPutString(StfData *f, const char *text)
Write a String.
Definition: stfwrite.c:71
int FfStepPtr(PTR *x)
Advance to next row.
Definition: zzz2.c:209
const char * FfToGap(FEL f)
Convert to GAP format.
Definition: zgap.c:27
const GrExtractionTable_t * GrGetExtractionTable(int fl, int grrows)
Calculate extraction table for grease.
Definition: grtable.c:168
void StrAppendF(String *s, const char *fmt,...)
snprintf() replacement.
Definition: string.c:206
int StfGetInt(StfData *f, int *buf)
Read an Integer.
Definition: stfread.c:155
int MtxMessageLevel
Message level.
Definition: message.c:31
Definition: meataxe.h:735
void FfAddMulRow(PTR dest, PTR src, FEL f)
Add a multiple of a row.
Definition: kernel-0.c:1022
int TK_WriteInfo(TkData_t *tki, const char *name)
Write a .tki file.
Definition: tkinfo.c:163
int BufSize
Used internally for memory management.
Definition: meataxe.h:738
int AppGetIntOption(MtxApplication_t *app, const char *spec, int dflt, int min, int max)
Check for integer-valued option.
Definition: args.c:567
int FfSetNoc(int noc)
Set the row length.
Definition: kernel-0.c:413
MatRep_t * MrTransposed(const MatRep_t *rep)
Transpose a Representation.
Definition: mrtranspose.c:29
An element of a matrix set.
Definition: meataxe.h:844
int OrigArgC
Original argc from main().
Definition: meataxe.h:301
PTR FfAddRowPartial(PTR dest, PTR src, int first, int len)
Add a part of two rows.
Definition: kernel-0.c:666
int NGen
Number of generators.
Definition: meataxe.h:1034
MtxApplication_t * AppAlloc(MtxApplicationInfo_t const *ai, int argc, const char **argv)
Initialize the application.
Definition: args.c:337
char MtxBinDir[1024]
MeatAxe program directory.
Definition: args.c:128
Matrix_t * SpinUpWithScript(const Matrix_t *seed, const MatRep_t *rep, const IntMatrix_t *script)
Spin-up with script.
Definition: spinup2.c:61
FEL MatTrace(const Matrix_t *mat)
Trace of a Matrix.
Definition: mattrace.c:27
int MatIsValid(const Matrix_t *m)
Check if the matrix is valid.
Definition: matcore.c:81
int MatrixToVector(const Matrix_t *mat, Matrix_t *vecs, int n)
Convert matrix to vector.
Definition: mat2vec.c:40
PTR MatGetPtr(const Matrix_t *mat, int row)
Pointer to a row of a matrix.
Definition: matcore.c:162
int MfIsValid(const MtxFile_t *file)
Check a File Object.
Definition: mfcore.c:42
PTR Data
Data, organized as array of rows.
Definition: meataxe.h:538
Poly_t * PolMod(Poly_t *a, const Poly_t *b)
Polynomial division.
Definition: poldiv.c:109
Definition: meataxe.h:1074
MtxErrorHandler_t * MtxSetErrorHandler(MtxErrorHandler_t *h)
Define an error handler.
Definition: error.c:111
int Nor
Number of rows.
Definition: meataxe.h:514
Matrix_t * WgMakeWord(WgData_t *b, long n)
Calculates a Word.
Definition: wgen.c:366
int Size
Number of elements.
Definition: meataxe.h:779
int Lat_AddSocle(Lat_Info *li, int *mult)
Add a Layer to the Socle Series.
Definition: cfinfo.c:459
int MrIsValid(const MatRep_t *rep)
Check a Matrix Representation.
Definition: mrcore.c:107
FPoly_t * FpMul(FPoly_t *dest, const FPoly_t *src)
Multiply Factored Polynomials.
Definition: fpmul2.c:34
int PermIsValid(const Perm_t *p)
Check a permutation.
Definition: permcore.c:61
int FpIsValid(const FPoly_t *p)
Check a Factored Polynomial.
Definition: fpcore.c:41
int Split(Matrix_t *subspace, const MatRep_t *rep, MatRep_t **sub, MatRep_t **quot)
Split a Representation.
Definition: split.c:102
int NFactors
Number of different irreducible factors.
Definition: meataxe.h:719
const char * AppCreateTempDir(MtxApplication_t *app)
Create a temporary directory.
Definition: args.c:712
int StfGetString(StfData *f, char *buf, size_t bufsize)
Read a string.
Definition: stfread.c:208
int FpPrint(const char *name, const FPoly_t *p)
Print a factored polynomial.
Definition: fpprint.c:35
void SysFree(void *x)
Free memory block.
Definition: os.c:411
void GrMapRow(PTR v, GreasedMatrix_t *M, PTR w)
Multiply a vector by a greased matrix.
Definition: grmaprow.c:131
long ndotl
Number of dotted lines.
Definition: meataxe.h:1025
void StrassenSetCutoff(size_t size)
Set the cutoff for Winograd-Strassen multiplication.
Definition: window.c:68
int BufSize
Used internally for memory management.
Definition: meataxe.h:720
Matrix_t * SAction(const Matrix_t *sub, const Matrix_t *gen)
Action on a subspace.
Definition: saction.c:44
int LineNo
Current line number (reading and writing)
Definition: meataxe.h:475
int BsOr(BitString_t *dest, const BitString_t *src)
Union of two bit strings.
Definition: bsor.c:33
int SetContains(const Set_t *set, long elem)
Check if a number is in a set.
Definition: settest.c:31
void MatPrint(const char *name, const Matrix_t *m)
Print a Matrix on stdout.
Definition: matprint.c:35
int ImatIsValid(const IntMatrix_t *m)
Check an Integer Matrix.
Definition: imatcore.c:48
Poly_t * PolDup(const Poly_t *p)
Duplicate a Polynomial.
Definition: poldup.c:33
int MsFree(MatrixSet_t *set)
Free a Matrix Set.
Definition: mscore.c:159
Matrix_t * MatInsert(const Matrix_t *mat, const Poly_t *pol)
Insert a matrix into a polynomial Given a square matrix A and a polynomial p over the same field,...
Definition: matins.c:119
Definition: meataxe.h:1018
Definition: meataxe.h:936
int GrRows
Grease level (# of rows, 0=no grease)
Definition: meataxe.h:616
long int MtxRandom(void)
Get the next (Pseudo-)Random number.
Definition: random.c:69
int PolGcdEx(const Poly_t *a, const Poly_t *b, Poly_t **result)
Greatest Common Divisor of two Polynomials.
Definition: polgcd.c:138
int StfGetVector(StfData *f, int *bufsize, int *buf)
Read a vector.
Definition: stfread.c:361
Poly_t * PolAlloc(int fl, int n)
Allocate a polynomial This function creates the polynomial p(x)=x^n over the current field.
Definition: polcore.c:102
FPoly_t * Factorization(const Poly_t *pol)
Factor a polynomial.
Definition: berlekmp.c:282
int GrBlockSize
Vectors per block (= Field^GrRows)
Definition: meataxe.h:617
Matrix_t * SpinUpWithPermutations(const Matrix_t *seed, int ngen, const Perm_t **gen, int flags, IntMatrix_t **script, SpinUpInfo_t *info)
Spin Up With Permutations.
Definition: spinup.c:600
const char * Name
Program name.
Definition: meataxe.h:286
unsigned long Magic
Used internally.
Definition: meataxe.h:646
const char * Text
Error message.
Definition: meataxe.h:380
int SysCreateDirectory(const char *name)
Create a directory.
Definition: os.c:331
int BsIsSub(const BitString_t *a, const BitString_t *b)
Bit string incidence relation.
Definition: bsissub.c:32
int PermSave(const Perm_t *perm, const char *fn)
Write a Permutation to a File.
Definition: permwrite.c:69
int StfWriteValue(StfData *f, const char *name, const char *value)
Write a String.
Definition: stfwrite.c:206
int BsSet(BitString_t *bs, int i)
IntMatrix_t * ImatLoad(const char *fn)
Read an Integer Matrix From a File.
Definition: imatread.c:65
int Nor
Number of rows.
Definition: meataxe.h:801
int SysRemoveDirectory(const char *name)
Remove a directory.
Definition: os.c:308
int MsCleanAndAppend(MatrixSet_t *set, Matrix_t *mat)
Extend a Matrix Set.
Definition: msclean.c:109
int FfCmpRows(PTR p1, PTR p2)
Compare two Rows.
Definition: zcmprow.c:37
MatRep_t * MrAlloc(int ngen, Matrix_t **gen, int flags)
Create a Matrix Representation.
Definition: mrcore.c:149
long peakword
Peak word.
Definition: meataxe.h:1022
int NCf
Number of relevant constituents.
Definition: meataxe.h:1078
int MatCopyRegion(Matrix_t *dest, int destrow, int destcol, const Matrix_t *src, int row1, int col1, int nrows, int ncols)
Copy a rectangular region of a matrix This function copies a rectangular region of src tp dest.
Definition: matcopy.c:48
int ImatSave(const IntMatrix_t *mat, const char *file_name)
Write an Integer Matrix to a File.
Definition: imatwrite.c:62
int * Description
Symbolic description of a word.
Definition: meataxe.h:902
Structured text file.
Definition: meataxe.h:469
int MatSave(const Matrix_t *mat, const char *fn)
Write a matrix to a file.
Definition: matwrite.c:66
int FfOrder
Current field order.
Definition: zzz2.c:45
int BsTest(const BitString_t *bs, int i)
FEL FfAdd(FEL a, FEL b)
Long ints per row.
Poly_t * PolRead(FILE *f)
Read a Polynomial from a File.
Definition: polread.c:60
int FfNoc
Current number of columns for row ops.
Definition: zzz2.c:63
FPoly_t * CharPol(const Matrix_t *mat)
Characteristic Polynomial.
Definition: charpol.c:274
int MatCompare(const Matrix_t *a, const Matrix_t *b)
Compare two matrices If the matrices are equal, the return value is 0.
Definition: matcmp.c:44
Matrix_t * MatRead(FILE *f)
Read a matrix from a file.
Definition: matread.c:29
long spl
Degree of splitting field.
Definition: meataxe.h:1026
int FfCleanRowAndRepeat(PTR row, PTR mat, int nor, const int *piv, PTR row2, PTR mat2)
Clean Row and Repeat Operations.
Definition: zcleanrow.c:107
int Lat_ReadInfo(Lat_Info *li, const char *basename)
Read a Lattice Information File.
Definition: cfinfo.c:152
void MtxErrorHandler_t(const MtxErrorRecord_t *)
Error handlers.
Definition: meataxe.h:388
int SetIsValid(const Set_t *s)
Check a set.
Definition: setcore.c:50
int Field
Field order.
Definition: meataxe.h:1033
char MtxLibDir[1024]
MeatAxe library directory (for multiplication tables etc.)
Definition: args.c:142
int MatWrite(const Matrix_t *mat, FILE *f)
Write a matrix to a file.
Definition: matwrite.c:30
int BsIntersectionCount(const BitString_t *a, const BitString_t *b)
Intersection count.
Definition: bsmatch.c:54
const GrExtractionTable_t * ExtrTab
Extraction table.
Definition: meataxe.h:620
Word Generator Data. This structure is used by the word generator to store the generators and interna...
Definition: meataxe.h:898
int FfCleanRow2(PTR row, PTR matrix, int nor, const int *piv, PTR row2)
Clean Row and Record Operations.
Definition: zcleanrow.c:69
Perm_t * PermPower(const Perm_t *p, int n)
Power of a permutation This function calculates the n-th power of a permutation.
Definition: permpwr.c:36
WgData_t * WgAlloc(const MatRep_t *rep)
Initialize the word generator.
Definition: wgen.c:426
int FfToInt(FEL f)
Convert field element to integer.
Definition: kernel-0.c:1073
Poly_t * PolDivMod(Poly_t *a, const Poly_t *b)
Polynomial Division.
Definition: poldiv.c:45
const char * Name
Path to the file.
Definition: meataxe.h:365
SharedMeatAxe 1.0 documentation