diff options
Diffstat (limited to 'plugins/setoid_ring')
| -rw-r--r-- | plugins/setoid_ring/InitialRing.v | 2 | ||||
| -rw-r--r-- | plugins/setoid_ring/ZArithRing.v | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/plugins/setoid_ring/InitialRing.v b/plugins/setoid_ring/InitialRing.v index 07f49cc4ff..9010917fec 100644 --- a/plugins/setoid_ring/InitialRing.v +++ b/plugins/setoid_ring/InitialRing.v @@ -815,7 +815,7 @@ Ltac ring_elements set ext rspec pspec sspec dspec rk := fun f => f arth ext_r morph lemma1 lemma2 | _ => fail 4 "ring: bad sign specification" end - | _ => fail 3 "ring: bad coefficiant division specification" + | _ => fail 3 "ring: bad coefficient division specification" end | _ => fail 2 "ring: bad power specification" end diff --git a/plugins/setoid_ring/ZArithRing.v b/plugins/setoid_ring/ZArithRing.v index 3c4f6b86cf..cf3a87e1d8 100644 --- a/plugins/setoid_ring/ZArithRing.v +++ b/plugins/setoid_ring/ZArithRing.v @@ -48,8 +48,8 @@ Ltac Zpower_neg := Add Ring Zr : Zth (decidable Zeq_bool_eq, constants [Zcst], preprocess [Zpower_neg;unfold Z.succ], power_tac Zpower_theory [Zpow_tac], - (* The two following option are not needed, it is the default chose when the set of - coefficiant is usual ring Z *) + (* The following two options are not needed; they are the default choice + when the set of coefficient is the usual ring Z *) div (InitialRing.Ztriv_div_th (@Eqsth Z) (@IDphi Z)), sign get_signZ_th). |