diff --git a/HLearn-distributions.cabal b/HLearn-distributions.cabal
--- a/HLearn-distributions.cabal
+++ b/HLearn-distributions.cabal
@@ -1,5 +1,5 @@
 Name:                HLearn-distributions
-Version:             1.0.0.1
+Version:             1.0.0.2
 Synopsis:            Distributions for use with the HLearn library
 Description:         This module is used to estimate statistical distributions from data.  It is based on the algebraic properties of the "HomTrainer" type class from the HLearn-algebra package.
 Category:            Data Mining, Machine Learning, Statistics
diff --git a/src/HLearn/Models/Distributions/Multivariate/Interface.hs b/src/HLearn/Models/Distributions/Multivariate/Interface.hs
--- a/src/HLearn/Models/Distributions/Multivariate/Interface.hs
+++ b/src/HLearn/Models/Distributions/Multivariate/Interface.hs
@@ -35,7 +35,7 @@
 import Control.DeepSeq
 import GHC.TypeLits
 
-import HLearn.Algebra
+import HLearn.Algebra hiding (Index (..))
 import HLearn.Models.Distributions.Common
 import HLearn.Models.Distributions.Multivariate.Internal.CatContainer hiding (ds,baseparams)
 import HLearn.Models.Distributions.Multivariate.Internal.Container
@@ -111,9 +111,9 @@
 type family HList2TypeList hlist :: [a]
 type instance HList2TypeList (HList xs) = xs
 
--- type family Index (xs::[a]) (i::Nat1) :: a
--- type instance Index (x ': xs) Zero = x
--- type instance Index (x ': xs) (Succ i) = Index xs i
+type family Index (xs::[a]) (i::Nat1) :: a
+type instance Index (x ': xs) Zero = x
+type instance Index (x ': xs) (Succ i) = Index xs i
 
 type family Replace2D (n :: Nat1) (xs :: [ [ a ] ]) (newval :: a) :: [ [ a ] ]
 type instance Replace2D Zero ((x ': xs) ': ys) newval = (newval ': xs) ': ys