diff --git a/haskseg.cabal b/haskseg.cabal
--- a/haskseg.cabal
+++ b/haskseg.cabal
@@ -4,14 +4,14 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 5c17f1d3fb53df989570fc2769e03a9e9156a94b8abf108d7d0997474b9c68fd
+-- hash: ab8c23c09c3e94d8cb24ce7d0dae17ef963be8a3458e85433bf2945008fce6bc
 
 name:           haskseg
-version:        0.1.0.2
+version:        0.1.0.3
 synopsis:       Simple unsupervised segmentation model
 description:    Implementation of the non-parametric segmentation model described in "Type-based MCMC" (Liang, Jordan, and Klein, 2010) and "A Bayesian framework for word segmentation Exploring the effects of context" (Goldwater, Griffiths, and Johnson, 2009).
 category:       NLP
-homepage:       https://github.com/githubuser/haskseg#readme
+homepage:       https://github.com/TomLippincott/haskseg#README.md
 author:         Tom Lippincott
 maintainer:     tom@cs.jhu.edu
 copyright:      2018 Tom Lippincott
diff --git a/src/Text/HaskSeg/Model.hs b/src/Text/HaskSeg/Model.hs
--- a/src/Text/HaskSeg/Model.hs
+++ b/src/Text/HaskSeg/Model.hs
@@ -69,8 +69,10 @@
   state' <- get
   put $ state' { _counts=cleanCounts (_counts state'), _startLookup=cleanLookup (_startLookup state'), _endLookup=cleanLookup (_endLookup state') }
   ll' <- unwrap <$> likelihood
-  let locs = (filter (\x -> _static x /= True) . Vector.toList) (_locations state)
-      locs' = (filter (\x -> _static x /= True) . Vector.toList) (_locations state')
+  let locs = (Vector.toList) (_locations state)
+      locs' = (Vector.toList) (_locations state')
+  --let locs = (filter (\x -> _static x /= True) . Vector.toList) (_locations state)
+  --    locs' = (filter (\x -> _static x /= True) . Vector.toList) (_locations state')      
       guesses = (map _morphFinal) locs
       guesses' = (map _morphFinal) locs'
       golds = (map _goldFinal) locs