proposition: Lemma trans_plus_comm : forall n m, n + m = m + n.
proof: Proof. fix rec_n 1. destruct n. - fix rec_m 1. destruct m. + reflexivity. + simpl. destruct (rec_m m); reflexivity. - simpl; intro; rewrite (rec_n n m). apply trans_S_comm. Defined.
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.Logic.Eqdep_dec Fiat.Computation Fiat.Narcissus.Common.Specs Fiat.Narcissus.Common.ComposeOpt Fiat.Narcissus.Formats.WordOpt Fiat.Narcissus.Formats.EnumOpt Fiat.Narcissus.Formats.Sequence Fiat.Narcissus.BaseFormats Fiat.Narcissus.BinLib.AlignedEncodeMonad Coq.Vectors.Vector Coq.ZArith.ZArith Bedrock.Word