Proof (Genv.senv_transf_partial TRANSF).

(* Specifications: *)
Lemma sig_preserved:
forall f tf,
transf_fundef f = OK tf ->
Linear.funsig tf = LTL.funsig f.
Lemma stacksize_preserved:
forall f tf,
transf_function f = OK tf ->
Linear.fn_stacksize tf = LTL.fn_stacksize f.
Lemma find_function_translated:
forall ros ls f,
LTL.find_function ge ros ls = Some f ->
exists tf,
find_function tge ros ls = Some tf /\ transf_fundef f = OK tf.