apple-0.1.0.0: math/f11.apple
λa.λb.λz.
{
rf ← [(*)/ₒ 1 (frange x (x+y-1) (⌊y))]; fact ← rf 1;
Σ ← λN.λa. (+)/ₒ 0 (a'(⍳ 0 N 1));
Σ 99 (λn. {nn⟜ℝ n; ((rf a nn)%(rf b nn))*((z^n)%(fact nn))})
}
λa.λb.λz.
{
rf ← [(*)/ₒ 1 (frange x (x+y-1) (⌊y))]; fact ← rf 1;
Σ ← λN.λa. (+)/ₒ 0 (a'(⍳ 0 N 1));
Σ 99 (λn. {nn⟜ℝ n; ((rf a nn)%(rf b nn))*((z^n)%(fact nn))})
}