From c33ba30ec4e8ed636906d824c300788e10df20b5 Mon Sep 17 00:00:00 2001 From: Pierre Boutillier Date: Wed, 23 Apr 2014 13:42:25 +0200 Subject: Eta contractions to please cbn --- theories/QArith/QArith_base.v | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'theories/QArith') diff --git a/theories/QArith/QArith_base.v b/theories/QArith/QArith_base.v index cf5bb3f2a..5acdd8292 100644 --- a/theories/QArith/QArith_base.v +++ b/theories/QArith/QArith_base.v @@ -925,8 +925,8 @@ Qed. (** * Rational to the n-th power *) -Definition Qpower_positive (q:Q)(p:positive) : Q := - pow_pos Qmult q p. +Definition Qpower_positive : Q -> positive -> Q := + pow_pos Qmult. Instance Qpower_positive_comp : Proper (Qeq==>eq==>Qeq) Qpower_positive. Proof. -- cgit v1.2.3