# Unterprogramm "simplify-sum"

************************************************
Dokumentnummer: D1349
************************************************

load(simplify_sum)$

sum(1/2**n,n,1,k);

simplify_sum(%);

sum(2*n-1,n,1,k);

simplify_sum(%);

sum(2*n,n,1,k);

simplify_sum(%);