tests :: [Test]
tests =
  [
    testGroup "UI"
    [
       testGroup    "Migrated from HUnit" $ hUnitTestToTests testRenderBullet
     , testProperty "SVG for bullet"      propRenderedSvgContainsCircle
    ]
  ]
tests :: [Test]
tests =
  [
    testGroup "UI"
    [
       testGroup    "Migrated from HUnit" $ hUnitTestToTests testRenderBullet
     , testProperty "SVG for bullet"      propRenderedSvgContainsCircle
    ]
  ]
tests =
  [
    testGroup "UI"
    [
       testGroup    "Migrated from HUnit" $ hUnitTestToTests testRenderBullet
     , testProperty "SVG for bullet"      propRenderedSvgContainsCircle
    ]
  ]