Local Open Scope pred.

Lemma tc_environ_make_args':
forall {CS: compspecs} argsig retsig bl rho Delta,
tc_environ Delta rho ->
tc_exprlist Delta (snd (split argsig)) bl rho
|-- !! tc_environ (funsig_tycontext (argsig, retsig)) (make_args (map fst argsig)
(eval_exprlist (snd (split argsig)) bl rho) rho).