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