fakeAddressForMonadAddresses :: NetworkMagic -> Address
fakeAddressForMonadAddresses nm = address
  where
    -- seed for address generation is a ByteString with 32 255's
    seedSize = 32
    seed = BS.replicate seedSize (255 :: Word8)
    address = makePubKeyAddressBoot nm $ fst $ deterministicKeyGen seed
fakeAddressForMonadAddresses :: NetworkMagic -> Address
fakeAddressForMonadAddresses nm = address
  where
    -- seed for address generation is a ByteString with 32 255's
    seedSize = 32
    seed = BS.replicate seedSize (255 :: Word8)
    address = makePubKeyAddressBoot nm $ fst $ deterministicKeyGen seed
fakeAddressForMonadAddresses nm = address
  where
    -- seed for address generation is a ByteString with 32 255's
    seedSize = 32
    seed = BS.replicate seedSize (255 :: Word8)
    address = makePubKeyAddressBoot nm $ fst $ deterministicKeyGen seed