fact: Definition mfix_tc' {A : Prop} {mt : MT_OF A} : forall (F : (A -> A)), A := match meq_sym (@mt_of_eq _ mt) in _ =m= R return (R -> R ) -> (R) with | meq_refl => MFixDef.mfix' _ end.
imports: Mtac2(Base Logic Datatypes MFixDef MTele MTeleMatch)