strip_ncomb : int -> term -> term * term list
# strip_ncomb 2 `f u v x y z`;; Warning: inventing type variables val it : term * term list = (`f u v x`, [`y`; `z`]) # strip_comb `f u v x y z`;; Warning: inventing type variables val it : term * term list = (`f`, [`u`; `v`; `x`; `y`; `z`])