blob: 02b98b1a33dbb06ef6e815818bece9afb6a79fd4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
module Mind
( NeuronIndex (..)
, getNeuronIndex
) where
-- types
data NeuronIndex = Input Int | Internal Int | Output Int
getNeuronIndex :: NeuronIndex -> Int
getNeuronIndex i = undefined
newtype Edge = Edge (NeuronIndex, Float)
|
