// File for storing Hecke algebra data.
LoadIn := [];
LoadInRel := <>;

Append(~LoadIn, <367, 13, 13, 1, 2, 367, 4, 1, 1, 4, 2, 3, 1, 3, "D_{3}", Polynomial(\[])>);
Append(~LoadInRel, <>);

Append(~LoadIn, <439, 13, 13, 1, 2, 439, 4, 2, 2, 4, 2, 3, 1, 4, "D_{5}", Polynomial(\[])>);
Append(~LoadInRel, <>);

Append(~LoadIn, <563, 13, 13, 1, 2, 563, 2, 1, 1, 4, 2, 3, 1, 3, "D_{3}", Polynomial(\[])>);
Append(~LoadInRel, <>);

Append(~LoadIn, <971, 13, 13, 1, 2, 971, 2, 2, 2, 4, 2, 3, 1, 4, "D_{5}", Polynomial(\[])>);
Append(~LoadInRel, <>);

Append(~LoadIn, <1223, 13, 13, 1, 2, 1223, 2, 2, 2, 4, 2, 3, 1, 4, "D_{5}", Polynomial(\[])>);
Append(~LoadInRel, <>);

Append(~LoadIn, <1427, 13, 13, 1, 2, 1427, 2, 1, 1, 4, 2, 3, 1, 5, "D_{3}", Polynomial(\[])>);
Append(~LoadInRel, <>);

Append(~LoadIn, <1439, 13, 13, 1, 2, 1439, 2, 1, 1, 28, 2, 3, 13, 5, "D_{3}", Polynomial(\[])>);
hKi := GF(13);
Append(~LoadInRel, <<4, 9, [ GF(13) | 0, 0, 0, 1, 1, 8, 5, 3, 2, 1, 3, 5, 12, 1, 2, 9, 11, 1, 3, 10, 11, 11, 3, 7, 11, 
2, 11 ]>, <4, 10, [ GF(13) | 0, 0, 0, 7, 0, 5, 6, 7, 2, 8, 6, 2, 3, 6, 2, 0, 2, 2, 2, 4, 5, 6, 10, 8, 12, 12, 1 ]>, <4, 
11, [ GF(13) | 0, 0, 0, 10, 6, 10, 11, 8, 12, 9, 6, 9, 3, 6, 11, 12, 5, 3, 12, 11, 7, 4, 4, 11, 1, 10, 12 ]>, <4, 12, [ 
GF(13) | 0, 0, 0, 6, 4, 0, 2, 5, 7, 3, 2, 0, 4, 8, 3, 2, 11, 2, 4, 2, 10, 12, 6, 11, 12, 3, 12 ]>>);

Append(~LoadIn, <1823, 13, 13, 1, 2, 1823, 2, 1, 1, 4, 2, 3, 1, 4, "D_{3}", Polynomial(\[])>);
Append(~LoadInRel, <>);

