Identifier
Identifier
Values
[1,0] generating graphics... => 2
[1,0,1,0] generating graphics... => 3
[1,1,0,0] generating graphics... => 5
[1,0,1,0,1,0] generating graphics... => 4
[1,0,1,1,0,0] generating graphics... => 7
[1,1,0,0,1,0] generating graphics... => 7
[1,1,0,1,0,0] generating graphics... => 9
[1,1,1,0,0,0] generating graphics... => 14
[1,0,1,0,1,0,1,0] generating graphics... => 5
[1,0,1,0,1,1,0,0] generating graphics... => 9
[1,0,1,1,0,0,1,0] generating graphics... => 10
[1,0,1,1,0,1,0,0] generating graphics... => 11
[1,0,1,1,1,0,0,0] generating graphics... => 19
[1,1,0,0,1,0,1,0] generating graphics... => 9
[1,1,0,0,1,1,0,0] generating graphics... => 16
[1,1,0,1,0,0,1,0] generating graphics... => 11
[1,1,0,1,0,1,0,0] generating graphics... => 15
[1,1,0,1,1,0,0,0] generating graphics... => 23
[1,1,1,0,0,0,1,0] generating graphics... => 19
[1,1,1,0,0,1,0,0] generating graphics... => 23
[1,1,1,0,1,0,0,0] generating graphics... => 28
[1,1,1,1,0,0,0,0] generating graphics... => 42
[1,0,1,0,1,0,1,0,1,0] generating graphics... => 6
[1,0,1,0,1,0,1,1,0,0] generating graphics... => 11
[1,0,1,0,1,1,0,0,1,0] generating graphics... => 13
[1,0,1,0,1,1,0,1,0,0] generating graphics... => 13
[1,0,1,0,1,1,1,0,0,0] generating graphics... => 24
[1,0,1,1,0,0,1,0,1,0] generating graphics... => 13
[1,0,1,1,0,0,1,1,0,0] generating graphics... => 23
[1,0,1,1,0,1,0,0,1,0] generating graphics... => 13
[1,0,1,1,0,1,0,1,0,0] generating graphics... => 18
[1,0,1,1,0,1,1,0,0,0] generating graphics... => 27
[1,0,1,1,1,0,0,0,1,0] generating graphics... => 26
[1,0,1,1,1,0,0,1,0,0] generating graphics... => 32
[1,0,1,1,1,0,1,0,0,0] generating graphics... => 33
[1,0,1,1,1,1,0,0,0,0] generating graphics... => 56
[1,1,0,0,1,0,1,0,1,0] generating graphics... => 11
[1,1,0,0,1,0,1,1,0,0] generating graphics... => 20
[1,1,0,0,1,1,0,0,1,0] generating graphics... => 23
[1,1,0,0,1,1,0,1,0,0] generating graphics... => 24
[1,1,0,0,1,1,1,0,0,0] generating graphics... => 43
[1,1,0,1,0,0,1,0,1,0] generating graphics... => 13
[1,1,0,1,0,0,1,1,0,0] generating graphics... => 24
[1,1,0,1,0,1,0,0,1,0] generating graphics... => 18
[1,1,0,1,0,1,0,1,0,0] generating graphics... => 22
[1,1,0,1,0,1,1,0,0,0] generating graphics... => 37
[1,1,0,1,1,0,0,0,1,0] generating graphics... => 32
[1,1,0,1,1,0,0,1,0,0] generating graphics... => 32
[1,1,0,1,1,0,1,0,0,0] generating graphics... => 43
[1,1,0,1,1,1,0,0,0,0] generating graphics... => 66
[1,1,1,0,0,0,1,0,1,0] generating graphics... => 24
[1,1,1,0,0,0,1,1,0,0] generating graphics... => 43
[1,1,1,0,0,1,0,0,1,0] generating graphics... => 27
[1,1,1,0,0,1,0,1,0,0] generating graphics... => 37
[1,1,1,0,0,1,1,0,0,0] generating graphics... => 57
[1,1,1,0,1,0,0,0,1,0] generating graphics... => 33
[1,1,1,0,1,0,0,1,0,0] generating graphics... => 43
[1,1,1,0,1,0,1,0,0,0] generating graphics... => 52
[1,1,1,0,1,1,0,0,0,0] generating graphics... => 76
[1,1,1,1,0,0,0,0,1,0] generating graphics... => 56
[1,1,1,1,0,0,0,1,0,0] generating graphics... => 66
[1,1,1,1,0,0,1,0,0,0] generating graphics... => 76
[1,1,1,1,0,1,0,0,0,0] generating graphics... => 90
[1,1,1,1,1,0,0,0,0,0] generating graphics... => 132
click to show generating function       
Description
Gives the number of generalised tilting modules of the corresponding LNakayama algebra.
Code
DeclareOperation("TiltingModules",[IsList]);

InstallMethod(TiltingModules, "for a representation of a quiver", [IsList],0,function(LIST)

local M, n, f, N, i, h;

u:=LIST[1];
A:=NakayamaAlgebra(GF(3),u);
g:=GlobalDimensionOfAlgebra(A,30);
L:=ARQuiver([A,1000])[2];
LL:=Filtered(L,x->(IsProjectiveModule(x)=false or IsInjectiveModule(x)=false));
r:=Size(SimpleModules(A))-(Size(L)-Size(LL));
subsets1:=Combinations([1..Length(LL)],r);subsets2:=List(subsets1,x->LL{x});
W:=Filtered(subsets2,x->N_RigidModule(DirectSumOfQPAModules(x),g)=true);




return([u,Size(W)]);

end);
Created
Aug 25, 2017 at 10:52 by Rene Marczinzik
Updated
Aug 25, 2017 at 10:52 by Rene Marczinzik