X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=src%2FReificationFromGeneralizedArrow.v;h=8d94dca914bd74c508fbdce4451c473d518de2f2;hb=7300187652058f4c24fd4527d9a5833583959fb4;hp=678de5c7d3d63f676ebe850d727bedc52ea4fe9e;hpb=bb960df7c29c851ca9d13f2d0c8f351ac24045ca;p=coq-hetmet.git

diff --git a/src/ReificationFromGeneralizedArrow.v b/src/ReificationFromGeneralizedArrow.v
index 678de5c..8d94dca 100644
--- a/src/ReificationFromGeneralizedArrow.v
+++ b/src/ReificationFromGeneralizedArrow.v
@@ -24,7 +24,7 @@ Require Import RepresentableStructure_ch7_2.
 Require Import Reification.
 Require Import GeneralizedArrow.
 
-Definition reification_from_garrow (K:Enrichment) (C:MonoidalEnrichment) (garrow : GeneralizedArrow K C)
+Definition reification_from_garrow (K:Enrichment) {ce} (C:MonoidalEnrichment ce) (garrow : GeneralizedArrow K C)
  : Reification K C (mon_i C).
   refine
   {| reification_r         := fun k:K => RepresentableFunctor K k >>>> garrow