formatting fixes

[coq-hetmet.git] / src / HaskCoreVars.v

diff --git a/src/HaskCoreVars.v b/src/HaskCoreVars.v
index 9225974..562b478 100644 (file)
--- a/src/HaskCoreVars.v
+++ b/src/HaskCoreVars.v
@@ -8,9 +8,8 @@ Require Import General.
 Require Import Coq.Strings.String.
 
 (* GHC uses a single type for expression variables, type variables, and coercion variables; this is that type *)
-Variable CoreVar          : Type.                                               Extract Inlined Constant CoreVar    => "Var.Var".
-Variable coreVar_eq       : forall (a b:CoreVar), sumbool (a=b) (not (a=b)).    Extract Inlined Constant coreVar_eq => "(==)".
-Variable coreVarToString  : CoreVar      -> string.  Extract Inlined Constant coreVarToString         => "outputableToString".
-Instance CoreVarEqDecidable : EqDecidable CoreVar := { eqd_dec            := coreVar_eq }.
-Instance CoreVarToString : ToString CoreVar :=
-  { toString := coreVarToString }.
+Variable CoreVar            : Type.                                               Extract Inlined Constant CoreVar    => "Var.Var".
+Variable coreVar_eq         : forall (a b:CoreVar), sumbool (a=b) (not (a=b)).    Extract Inlined Constant coreVar_eq => "(==)".
+Variable coreVarToString    : CoreVar      -> string.             Extract Inlined Constant coreVarToString => "outputableToString".
+Instance CoreVarEqDecidable : EqDecidable CoreVar := { eqd_dec  := coreVar_eq      }.
+Instance CoreVarToString    : ToString CoreVar    := { toString := coreVarToString }.