read Cfinite: print(`Here is a full dicovery and proof of the product of three Chebychev polynomials analog`): print(`of Louis Shapiro's generating function `): print(`given in his paper A combinatorial proof of a Chebyshev polynomial identity, Discrete Math. 34 (1981), pages 203-206.`): KefelV(Kefel(Ux(a),Ux(b)),Ux(c)) : print(`This took`, time(), `seconds .`): quit: