funops.pas : j-style combinators in fpc!!!