vvalue
implGetSnapshotFor :: (IOLike m, LedgerSupportsMempool blk, HasTxId (GenTx blk))=> MempoolEnv m blk-> SlotNo-> TickedLedgerState blk DiffMK-> LedgerTables blk KeysMK -> m (LedgerTables blk ValuesMK)-> m (MempoolSnapshot blk)