A forma como as datas são representadas em Q torna mais fácil encontrar o dia da semana quando fornecida a data.
Como todas as datas são armazenadas internamente como inteiros correspondentes ao número de dias desde 01/01/2000 e como essa data passou a ser um sábado, uma função simples para fornecer o dia é:
todayIs ::`Sat`Sun`Mon`Tue`Wed`Thu`Fri .z.D mod 7