fact: Definition Lifted_is_false {av} ext tenv test := @LiftPropertyToTelescope av ext (fun st => is_false st test) tenv.
imports: Coq.Classes.Morphisms CertifiedExtraction.Core CertifiedExtraction.Utils Coq.Setoids.Setoid