diff --git a/hmm-lapack.cabal b/hmm-lapack.cabal
--- a/hmm-lapack.cabal
+++ b/hmm-lapack.cabal
@@ -1,8 +1,8 @@
 Name:                hmm-lapack
-Version:             0.3
-Synopsis:            Hidden Markov Models using HMatrix primitives
+Version:             0.3.0.1
+Synopsis:            Hidden Markov Models using LAPACK primitives
 Description:
-  Hidden Markov Models implemented using HMatrix data types and operations.
+  Hidden Markov Models implemented using LAPACK data types and operations.
   <http://en.wikipedia.org/wiki/Hidden_Markov_Model>
   .
   It implements:
@@ -29,7 +29,7 @@
   * "Math.HiddenMarkovModel.Example.Circle"
   .
   An alternative package without foreign calls is @hmm@.
-Homepage:            http://hub.darcs.net/thielema/hmm-hmatrix
+Homepage:            http://hub.darcs.net/thielema/hmm-lapack
 License:             BSD3
 License-File:        LICENSE
 Author:              Henning Thielemann
@@ -41,13 +41,13 @@
   Changes.md
 
 Source-Repository this
-  Tag:         0.3
+  Tag:         0.3.0.1
   Type:        darcs
-  Location:    http://hub.darcs.net/thielema/hmm-hmatrix
+  Location:    http://hub.darcs.net/thielema/hmm-lapack
 
 Source-Repository head
   Type:        darcs
-  Location:    http://hub.darcs.net/thielema/hmm-hmatrix
+  Location:    http://hub.darcs.net/thielema/hmm-lapack
 
 Library
   Exposed-Modules:
@@ -68,7 +68,7 @@
     Math.HiddenMarkovModel.CSV
   Build-Depends:
     lapack >=0.2 && <0.3,
-    fixed-length >=0.2 && <0.3,
+    fixed-length >=0.2.1 && <0.3,
     tfp >=1.0 && <1.1,
     netlib-ffi >=0.1.1 && <0.2,
     comfort-array >=0.2 && <0.3,
diff --git a/src/Math/HiddenMarkovModel/Test.hs b/src/Math/HiddenMarkovModel/Test.hs
--- a/src/Math/HiddenMarkovModel/Test.hs
+++ b/src/Math/HiddenMarkovModel/Test.hs
@@ -20,7 +20,6 @@
 import qualified Data.Array.Comfort.Shape as Shape
 
 import qualified Data.FixedLength as FL
-import Data.FixedLength ((!:))
 
 import qualified Type.Data.Num.Unary.Literal as TypeNum
 import Type.Base.Proxy (Proxy(Proxy))
@@ -65,8 +64,9 @@
 stateSet = ShapeStatic.ZeroBased Proxy
 
 stateVector :: Double -> Double -> Double -> Double -> Vector StateSet Double
-stateVector x0 x1 x2 x3 = ShapeStatic.vector $ x0!:x1!:x2!:x3!:FL.end
--- stateVector = FL.curry ShapeStatic.vector
+stateVector =
+   FL.curry
+      (ShapeStatic.vector :: FL.T TypeNum.U4 Double -> Vector StateSet Double)
 
 
 sequ :: NonEmpty.T [] Char