sS renderZipEntriesWithCompressedSizes(S zip) {
  ret renderZipEntriesWithCompressedSizes(newFile(zip));
}

sS renderZipEntriesWithCompressedSizes(File zip) {
  ret asciiTable(ll("File", "Compressed", "Uncompressed"),
    map(func(ZipEntry e) -> LS {
      ll(e.getName(), toM_str(e.getCompressedSize()), toM_str(e.getSize()))
    }, listZipEntries(zip)));
}