vvalue
extractBlockComponent :: (HasHeader blk, ReconstructNestedCtxt Header blk, DecodeDisk blk (ByteString -> Either DecoderError blk), DecodeDiskDep (NestedCtxt Header) blk, IOLike m)=> HasFS m h-> ChunkInfo-> ChunkNo-> CodecConfig blk-> blk -> Bool-> Handle h-> WithBlockSize (Entry blk)-> BlockComponent blk b-> m b