Programs k-intersecting a MAGMA program for the paper „Fourier analysis on finite groups and the Lovasz theta number of Cayley graphs“