module MindTest (suite) where

import Test.Tasty
import Test.Tasty.HUnit

import Mind

suite :: TestTree
suite = testGroup "mind tests" $
  [ neuronIndexTests
  ]

neuronIndexTests :: TestTree
neuronIndexTests = testGroup "neuron index tests" $
  [ testCase "get input index" $ getNeuronIndex (Input 4) @?= 4
  ]