tests :: TestTree
tests = testGroup "VI Tests"
  [ makeCorpusTest [This Time] corpus
  ]
tests :: TestTree
tests = testGroup "VI Tests"
  [ makeCorpusTest [This Time] corpus
  ]
tests = testGroup "VI Tests"
  [ makeCorpusTest [This Time] corpus
  ]