diff --git a/src/Grenade/Layers/Pad.hs b/src/Grenade/Layers/Pad.hs
index d200569..e9600e1 100644
--- a/src/Grenade/Layers/Pad.hs
+++ b/src/Grenade/Layers/Pad.hs
@@ -49,7 +49,7 @@ instance Serialize (Pad l t r b) where
   put _ = return ()
   get = return Pad
 
--- | A two dimentional image can be padped.
+-- | A two dimentional image can be padded.
 instance ( KnownNat padLeft
          , KnownNat padTop
          , KnownNat padRight
@@ -79,7 +79,7 @@ instance ( KnownNat padLeft
         vs    = subMatrix (padt, padl) (nrows, ncols) m
     in  ((), S2D . fromJust . create $ vs)
 
--- | A two dimentional image can be padped.
+-- | A two dimentional image can be padded.
 instance ( KnownNat padLeft
          , KnownNat padTop
          , KnownNat padRight