Fixed some typos

This commit is contained in:
Nick Van den Broeck 2018-04-20 16:57:14 +02:00
parent 647e491cbe
commit 8c49bf8231

View File

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