static Conveyor<F, int> intsFrom<F, O>(Monad<F> monad, int from) => constant(monad, 1).pipe(Pipe.scan(from-1, (int a, int b) => a+b));