f:{&{(+/y# x)=+/(y+1)_x}[x]'!#x} f -7 1 5 2 -4 3 0 3 6 f 2 4 6 !0 f 2 9 2 ,1 f 1 -1 1 -1 1 -1 1 0 1 2 3 4 5 6