RosettaCodeData/Task/Partial-function-application/Elena/partial-function-application.elena

import system'collections;
import system'routines;
import extensions;

public Program()
{
    var partial := (afs,af => (s => afs(af, s)));

    var fs := (f,s => s.selectBy::(x => f(x)).summarize(new ArrayList()).toArray());
    var f1 := (x => x * 2);
    var f2 := (x => x * x);

    var fsf1 := partial(fs, f1);
    var fsf2 := partial(fs, f2);

    Console.printLine(fsf1(new int[]{2,4,6,8}).toString());
    Console.printLine(fsf2(new int[]{2,4,6,8}).toString())
}