@@ -16,7 +16,7 @@ import Data.Singletons.Prelude
1616import Grenade.Core.Network
1717import Grenade.Core.Shape
1818
19−-- | Drive and network and collect it's back propogated gradients.
19+-- | Drive and network and collect its back propogated gradients.
2020backPropagate :: forall input output shapes layers. (Head shapes ~ input, Last shapes ~ output)
2121 => Network layers shapes -> S' input -> S' output -> Gradients layers
2222backPropagate network input target =
@@ -29,7 +29,7 @@ backPropagate network input target =
2929 -- handle input from the beginning, feeding upwards.
3030 go !x (layer :~> n)
3131 = let y = runForwards layer x
32− -- recursively run the rest of the network, and get the layer from above.
32+ -- recursively run the rest of the network, and get the gradients from above.
3333 (n', dWs') = go y n
3434 -- calculate the gradient for this layer to pass down,
3535 (layer', dWs) = runBackards layer x dWs'