DeepDarkFantasy-0.2017.8.10: A DSL for creating neural network.
DDF.Sam.Xor
doubleWeight :: Lang repr => ImpW repr h Double Source #
sigmoid :: Lang r => r h (Double -> Double) Source #
sigmoid1 :: Lang r => r h Double -> r h Double Source #
scaleAdd :: Lang repr => ImpW repr h ((Double, Double) -> Double) Source #
withBias :: Lang repr => ImpW repr h (Double -> Double) Source #
neuron :: Lang repr => ImpW repr h ((Double, Double) -> Double) Source #
neuron1 :: Lang repr => ImpW repr h (Double, Double) -> ImpW repr h Double Source #
hidden :: Lang repr => ImpW repr h ((Double, Double) -> ((Double, Double), (Double, Double))) Source #
type XOR = (Double, Double) -> Double Source #
xorNet :: Lang repr => ImpW repr h XOR Source #
l2 :: Lang repr => repr h (Double -> Double -> Double) Source #
l22 :: Lang r => r h Double -> r h Double -> r h Double Source #
eval :: Lang repr => repr h (XOR -> ((Double, Double), Double) -> Double) Source #
dataset :: Lang repr => repr h [((Double, Double), Double)] Source #
loss :: Lang repr => repr h (XOR -> Double) Source #
findXor :: forall g m. (RandomGen g, Monad m) => g -> (AST -> m ()) -> (Int -> Double -> String -> m ()) -> m XOR Source #
main :: IO () Source #