(lambda c, xmake, start, s: (
    start(
    (lambda xprint, xinput: (
        c(xprint("Even-Odd Counter"))
        (lambda _:
        c(xinput("Enumerate integers(separated by comma): "))
        (lambda input_string:
        s(list(map(lambda m: int(m.strip()), input_string.split(","))))
        (lambda numbers:
        s(sum(map(lambda i: i % 2 == 0, numbers)))
        (lambda evens:
        s(len(numbers) - evens)
        (lambda odds:
        xprint(f"Evens: {evens}EA, Odds: {odds}EA")
        )))))
    ))(xmake(print), xmake(input))
    )
))(
    lambda m: lambda k: lambda f: m(lambda x: k(x)(f)),
    lambda fn: lambda *args, **kwargs: lambda f: f(fn(*args, **kwargs)),
    lambda m: m(lambda _: None),
    lambda x: lambda f: f(x)
)