Прошу прощения. Не дочитал про разрядность.
Попробуйте вот так:
module test
#(parameter N=8,M=4)
(
input [N*M-1:0]var_n,
output [M-1:0]A
);
genvar i;
generate
assign A[0]=&var_n[N-1:0];
for(i=1;i<M;i=i+1)
begin: ABC
assign A[i]=&var_n[(i+1)*N-1:N*(i-1)+N];
end
endgenerate
endmodule
RTL: