|
MAPLE
|
with(combstruct):ZL0:=S=Prod(Sequence(Prod(a, Sequence(b))), a):ZL1:=Prod(begin_blockP, Z, end_blockP):ZL2:=Prod(begin_blockLR, Z, Sequence(Prod(mu_length, Z), card>=1), end_blockLR): ZL3:=Prod(begin_blockRL, Sequence(Prod(mu_length, Z), card>=1), Z, end_blockRL):Q:=subs([a=Union(ZL1, ZL2, ZL3), b=ZL1], ZL0), begin_blockP=Epsilon, end_blockP=Epsilon, begin_blockLR=Epsilon, end_blockLR=Epsilon, begin_blockRL=Epsilon, end_blockRL=Epsilon, mu_length=Epsilon:temp15:=draw([S, {Q}, unlabelled], size=16):seq(count([S, {Q}, unlabelled], size=n), n=1..26); - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 08 2008
with(finance):seq(ceil(futurevalue(8, 2, n)), n=-2..23); # [From Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 25 2009]
|