1
0
mirror of https://github.com/kalmarek/PropertyT.jl.git synced 2024-11-19 15:25:29 +01:00

Be more verbose in SDPGenerateAll

This commit is contained in:
kalmar 2016-12-20 00:27:47 +01:00
parent 2ebf3060f8
commit 6cdc9a980b

View File

@ -86,15 +86,26 @@ end;
SDPGenerateAll := function(G, S, basis, name) SDPGenerateAll := function(G, S, basis, name)
local QG, emb, delta, delta_sq, delta_vec, delta_sq_vec, product_constr; local QG, emb, delta, delta_sq, delta_vec, delta_sq_vec, product_constr;
Print("Initializing GroupAlgebra");
QG := GroupRing(Rationals, G);; QG := GroupRing(Rationals, G);;
Print(".");
emb := Embedding(G,QG);; emb := Embedding(G,QG);;
Print("\n");
Print("Initializing GroupAlgebra elements: ");
delta := Laplacian(G, S);; delta := Laplacian(G, S);;
Print("delta! ");
delta_sq := delta^2;; delta_sq := delta^2;;
Print("delta_sq! ");
Print("\n");
Print("Check if delta_sq is supported on the given basis: ");
if not IsSupportedOn(basis, delta_sq) then if not IsSupportedOn(basis, delta_sq) then
# Print("delta_sq is not supported on basis\n"); Print("delta_sq is not supported on basis\n");
return fail; return fail;
else else
Print("it is!\n");
PrintTo(Concatenation("./basis.", name), basis); PrintTo(Concatenation("./basis.", name), basis);
Print("Written basis to ", Concatenation("./basis.", name), "\n"); Print("Written basis to ", Concatenation("./basis.", name), "\n");
delta_vec := Vectorise(delta, basis);; delta_vec := Vectorise(delta, basis);;