From d128c42a96110eceb3a82ff26263388efff20623 Mon Sep 17 00:00:00 2001 From: sanine Date: Tue, 21 Nov 2023 10:11:19 -0600 Subject: initial stack configuration --- src/Lib.hs | 6 ++++++ src/Mind.hs | 11 +++++++++++ 2 files changed, 17 insertions(+) create mode 100644 src/Lib.hs create mode 100644 src/Mind.hs (limited to 'src') diff --git a/src/Lib.hs b/src/Lib.hs new file mode 100644 index 0000000..d36ff27 --- /dev/null +++ b/src/Lib.hs @@ -0,0 +1,6 @@ +module Lib + ( someFunc + ) where + +someFunc :: IO () +someFunc = putStrLn "someFunc" diff --git a/src/Mind.hs b/src/Mind.hs new file mode 100644 index 0000000..02b98b1 --- /dev/null +++ b/src/Mind.hs @@ -0,0 +1,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) -- cgit v1.2.1