#C16.txt, March 24, 2025 QFT Help16:=proc(): print(`QFT(q)`):end: #QFT(q): The q by q matrix of the Fast Fourier transform QFT:=proc(q) local a,c: [seq([seq(exp(2*Pi*I*a*c/q), c=0..q-1)], a=0..q-1)]: end: