proposition: Lemma preserves_factorials (n : nat) : f (Str_nth n factorials) = Str_nth n factorials.
proof: Proof. rewrite 2!Str_nth_factorials. now rewrite <-(naturals.to_semiring_unique (f ∘ naturals_to_semiring nat A)). Qed.
imports: Coq.setoid_ring.Ring Coq.Arith.Factorial MathClasses.misc.workaround_tactics MathClasses.interfaces.abstract_algebra MathClasses.interfaces.additional_operations MathClasses.interfaces.orders MathClasses.interfaces.naturals MathClasses.interfaces.integers MathClasses.theory.nat_pow MathClasses.theory.int_pow MathClasses.theory.streams