You can find a (short and hopefully sweet) Mathematica notebook to compute the Weyl characters for fundamental tilting modules that you can download on this page.
This uses the below formula from https://arxiv.org/abs/2303.04264
References for the recalled background below can also be found in that paper.
Fix some
Fix any field
The quantum group
- The Weyl modules
$\Delta(\lambda)$ that play the role of standard modules. - The dual Weyl modules
$\nabla(\lambda)$ that play the role of costandard modules. - The simple modules
$L(\lambda)$ that play the role of atoms. These are not addressed in this notebook. - The indecomposable tilting modules
$T(\lambda)$ that play the role of projective modules.
As usual in representation theory, we would like to understand the characters of these modules. For the first two this is easy:
Let
First, the initial conditions are
The Mathematica notebook computes these characters.
There are only a few functions in the notebook:
qbin[n_, k_, q_] is the quantum binomial
$\binom{n}{k}$ (or rather a shift of it); with input n,k, and$\xi\leftrightsquigarrow q$
WeylCharSp[n_, k_, p_, q_] computes the character of
$T(\varpi_{k})$ for$\mathfrak{sp}_{2n}$ . Here$p$ is the characteristic of$\mathbb{K}$ (take$p\gg 0$ to simulate characteristic zero) and$\xi\leftrightsquigarrow q$
XX = Table[WeylCharSp[78, k, 7, 2], {k, 0, 78}]; MM = Table[If[Count[XX[[j]], i] == 1, 1, 0], {i, 0, 78}, {j, 0, 78}]; MatrixPlot[MM] then outputs the whole base change matrix as in the example below
For example, for
The columns are the fundamental tilting modules
In case of questions drop us an email: elijah.bodish@gmail.com dtubbenhauer@gmail.com