Skip to content

Commit

Permalink
seq compatibility with math-comp/math-comp#790
Browse files Browse the repository at this point in the history
Companion of math-comp#56, see math-comp#56 for explanation
  • Loading branch information
JasonGross committed Mar 3, 2023
1 parent b5e20bf commit ac495a3
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/freeg.v
Expand Up @@ -514,7 +514,7 @@ Section FreegTheory.
Qed.

Lemma Freeg_dom D:
[freeg [seq (coeff z D, z) | z <- dom D]] = D.
[freeg [seq (coeff x D, x) | x <- dom D]] = D.
Proof.
apply/esym/eqP/freeg_eqP=> k.
rewrite -{1 2}[D]freeg_repr !coeff_Freeg /dom.
Expand Down Expand Up @@ -943,7 +943,7 @@ Section FreeglModType.
Canonical freeg_lmodType :=
Eval hnf in LmodType R {freeg K / R} freeg_lmodMixin.
End FreeglModType.

(* -------------------------------------------------------------------- *)
Section FreeglModTheory.
Variable R : ringType.
Expand Down

0 comments on commit ac495a3

Please sign in to comment.