diff options
| -rw-r--r-- | theories/Classes/Equivalence.v | 6 | ||||
| -rw-r--r-- | theories/Classes/SetoidTactics.v | 2 | ||||
| -rw-r--r-- | tools/coqdoc/coqdoc.sty | 2 |
3 files changed, 5 insertions, 5 deletions
diff --git a/theories/Classes/Equivalence.v b/theories/Classes/Equivalence.v index ef85c14aa7..469147cf44 100644 --- a/theories/Classes/Equivalence.v +++ b/theories/Classes/Equivalence.v @@ -103,12 +103,12 @@ Section Respecting. (** Here we build an equivalence instance for functions which relates respectful ones only, we do not export it. *) - Definition respecting [ Equivalence A (R : relation A), Equivalence B (R' : relation B) ] : Type := + Definition respecting {( eqa : Equivalence A (R : relation A), eqb : Equivalence B (R' : relation B) )} : Type := { morph : A -> B | respectful R R' morph morph }. Program Instance respecting_equiv [ eqa : Equivalence A R, eqb : Equivalence B R' ] : - Equivalence (fun (f g : respecting) => forall (x y : A), R x y -> R' (proj1_sig f x) (proj1_sig g y)). - + Equivalence (fun (f g : respecting eqa eqb) => forall (x y : A), R x y -> R' (proj1_sig f x) (proj1_sig g y)). + Solve Obligations using unfold respecting in * ; simpl_relation ; program_simpl. Next Obligation. diff --git a/theories/Classes/SetoidTactics.v b/theories/Classes/SetoidTactics.v index f8b7f62e97..024b400ae0 100644 --- a/theories/Classes/SetoidTactics.v +++ b/theories/Classes/SetoidTactics.v @@ -178,7 +178,7 @@ Ltac reverse_arrows x := end. Ltac default_add_morphism_tactic := - intros ; + unfold flip ; intros ; (try destruct_morphism) ; match goal with | [ |- (?x ==> ?y) _ _ ] => red_subst_eq_morphism (x ==> y) ; reverse_arrows (x ==> y) diff --git a/tools/coqdoc/coqdoc.sty b/tools/coqdoc/coqdoc.sty index 7380deb603..fdf11cb9c4 100644 --- a/tools/coqdoc/coqdoc.sty +++ b/tools/coqdoc/coqdoc.sty @@ -92,7 +92,6 @@ \ifpdf \RequirePackage{hyperref} \hypersetup{raiselinks=true,colorlinks=true,linkcolor=black} - \RequirePackage{hypcap} % To do indexing, use something like: % \usepackage{multind} @@ -148,6 +147,7 @@ \newcommand{\coqdefinitionref}[2]{\coqref{#1}{\coqdoccst{#2}}} \newcommand{\coqvariable}[2]{\coqdocvar{#2}} +\newcommand{\coqvariableref}[2]{\coqref{#1}{\coqdocvar{#2}}} \newcommand{\coqinductive}[2]{\coqdef{#1}{#2}{\coqdocind{#2}}} \newcommand{\coqinductiveref}[2]{\coqref{#1}{\coqdocind{#2}}} |