Sub Button1_Click
Dim b() As Byte = DecompressInputStream(File.OpenInput(File.DirAssets, "10x10y.compressed"))
Log(BytesToString(b, 0, b.Length, "utf8"))
End Sub
Sub DecompressInputStream(in As InputStream) As Byte()
Dim jo As JavaObject
jo.InitializeNewInstance("org.brotli.dec.BrotliInputStream", Array(in))
Return Bit.InputStreamToBytes(jo.As(InputStream))
End Sub