Proof ptc_inf_ppal_type _ _ v6_algorithms.

(* Specifications: *)
Lemma check_wf_type :
forall (e : env_v6) (t : trm_v6), wf_v6 e -> wft_dec _ v6_pts e t.
Lemma check_wf_type :
forall (e : env_v6) (t : trm_v6), wf_v6 e -> wft_dec _ v6_pts e t.