X-Git-Url: http://git.megacz.com/?p=coq-hetmet.git;a=blobdiff_plain;f=src%2FHaskStrong.v;fp=src%2FHaskStrong.v;h=6539c89cdb43ca5d9431f91f97ca494e08a41c6c;hp=1f4d03bf7bafbea3ae38903fb41f312e998f5c4f;hb=fba815a8a6107b5cdf3a99bd77df34d4b05e702c;hpb=aec3c690756a1918a9b1756e930a920a7514ff37

diff --git a/src/HaskStrong.v b/src/HaskStrong.v
index 1f4d03b..6539c89 100644
--- a/src/HaskStrong.v
+++ b/src/HaskStrong.v
@@ -12,6 +12,7 @@ Require Import HaskCoreTypes.
 Require Import HaskLiteralsAndTyCons.
 Require Import HaskStrongTypes.
 Require Import HaskWeakVars.
+Require Import HaskCoreVars.
 
 Section HaskStrong.
 
@@ -74,11 +75,8 @@ Section HaskStrong.
   | ELR_branch : ∀ Γ Δ ξ l t1 t2, ELetRecBindings Γ Δ ξ l t1 -> ELetRecBindings Γ Δ ξ l t2 -> ELetRecBindings Γ Δ ξ l (t1,,t2)
   .
 
-
   Context {ToStringVV:ToString VV}.
-
-  Require Import HaskCoreVars.
-
+  Context {ToLatexVV:ToLatex VV}.
   Fixpoint exprToString {Γ}{Δ}{ξ}{τ}(exp:Expr Γ Δ ξ τ) : string :=
     match exp with
     | EVar  Γ' _ ξ' ev              => "var."+++ev