-- Start of metadata: 8196
-- End of metadata: 10168
-- 1972 = 3da * 2 = 986 * 2

numBytes :: (Binary b, Num t) => b -> t
numBytes x = fromIntegral $ BSL.length $ runPut $ put x
numBytes :: (Binary b, Num t) => b -> t
numBytes x = fromIntegral $ BSL.length $ runPut $ put x
numBytes x = fromIntegral $ BSL.length $ runPut $ put x