Commit a60c45e2 authored by Bastian Kauschke's avatar Bastian Kauschke
Browse files

typo

parent 77b34556
......@@ -18,14 +18,14 @@ import Data.Float.Utils ( EqDouble )
spec :: Spec
spec = do
paseIntSpec
parseIntSpec
parseMorphismPointIntSpec
parseMorphismPointDoubleSpec
parseMorphismPointComplexSpec
parseMorphismPointRationalSpec
paseIntSpec :: Spec
paseIntSpec = describe "Int-valued parser" $ do
parseIntSpec :: Spec
parseIntSpec = describe "Int-valued parser" $ do
it "parses Z^X" $
parseFunctorExpression [[functorExprParser intValued]] "" "Z^X"
`shouldParse` (Functor 1 (GroupValued Variable))
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment