let fold_num_inputs f acc sgn = List.fold_left f acc sgn.in_params