proposition: Lemma DropName_NotInTelescope : forall {av} (tenv: Telescope av) k, NotInTelescope k tenv -> TelStrongEq (DropName k tenv) tenv.
proof: Proof. induction tenv; intros; simpl. - reflexivity. - destruct key; simpl in *; cleanup; [ | destruct (string_dec _ _); subst; cleanup ]; constructor; eauto with typeclass_instances. Qed.
imports: CertifiedExtraction.Core CertifiedExtraction.FacadeNotations CertifiedExtraction.PropertiesOfTelescopes CertifiedExtraction.ExtendedLemmas