read `TEL.txt`; PMGMB(-(2^(n-1)*n+n^2-2^(n-1)-2)/factorial(n+1),n,5,0,{n,2^n}); quit;