Function detect_compression 

pub fn detect_compression<R: BufRead + Seek>(
    reader: &mut R,
) -> ImageResult<PkmCompression>