These Magma scripts are intended to provide computational evidence for the affine Macdonald denominator conjecture stated in the paper:

E. M. Rains, Y. Sun, and A. Varchenko. Affine Macdonald conjectures and special values of Felder-Varchenko functions. Preprint, 2016.

To reproduce computations for U_q(sl_2 hat) and U_q(sl_3 hat), call the function get_trace(k) in denominator-series-2.mag and denominator-series-3.mag, respectively.