-- | A message digest produced with the SHA-512 algorithm.
dSha512 :: Lens' Digest (Maybe ByteString)
dSha512
  = lens _dSha512 (\ s a -> s{_dSha512 = a}) .
      mapping _Bytes
dSha512 :: Lens' Digest (Maybe ByteString)
dSha512
  = lens _dSha512 (\ s a -> s{_dSha512 = a}) .
      mapping _Bytes
dSha512
  = lens _dSha512 (\ s a -> s{_dSha512 = a}) .
      mapping _Bytes