Replace licence in cabal file

This commit is contained in:
Huw Campbell 2016-06-28 09:31:44 +10:00
parent 0c66f33efa
commit 719b3c27ed
4 changed files with 6 additions and 7 deletions

View File

@ -1,9 +1,9 @@
name: grenade
version: 0.0.1
license: AllRightsReserved
author: Ambiata <info@ambiata.com>
maintainer: Ambiata <info@ambiata.com>
copyright: (c) 2015 Ambiata.
license: BSD
author: Huw Campbell <huw.campbell@gmail.com>
maintainer: Huw Campbell <huw.campbell@gmail.com>
copyright: (c) 2015 Huw Campbell.
synopsis: grenade
category: System
cabal-version: >= 1.8

View File

@ -28,5 +28,4 @@ import Grenade.Layers.FullyConnected as X
import Grenade.Layers.Logit as X
import Grenade.Layers.Convolution as X
import Grenade.Layers.Relu as X
-- import Grenade.Layers.Recurrent as X
import Grenade.Layers.Tanh as X

View File

@ -146,7 +146,7 @@ instance ( Monad m
kN = fromJust . create $ tr c LA.<> vs
mm = momentum * 0.9 - konst rate * kN
wd = konst (0.0005 * rate) * kernel
wd = konst (0.0001 * rate) * kernel
rM = kernel + mm - wd
dW = vs LA.<> tr ek

View File

@ -38,7 +38,7 @@ instance (Monad m, KnownNat i, KnownNat o) => Layer m (FullyConnected i o) ('D1
runBackards rate (FullyConnected wB wN mm) (S1D' x) (S1D' dEdy) =
let wB' = wB - konst rate * dEdy
mm' = 0.9 * mm - konst rate * (dEdy `outer` x)
wd' = konst (0.0005 * rate) * wN
wd' = konst (0.0001 * rate) * wN
wN' = wN + mm' - wd'
w' = FullyConnected wB' wN' mm'
-- calcluate derivatives for next step