fact: Definition reformat_T_iter_T_right_property:forall (j:nat) (X Y:Set) (f:X->Y) (ssx:T_iter (S j) X), lift_T_ _ _ (lift_T_iter _ _ f j) (reformat_T_iter_T_right j X ssx) = reformat_T_iter_T_right j Y (lift_T_iter X Y f (S j) ssx).
imports: WeaklyFinalCoalgebra