diff --git a/cpdfimpose.ml b/cpdfimpose.ml
index a549f46..2374f30 100644
--- a/cpdfimpose.ml
+++ b/cpdfimpose.ml
@@ -128,7 +128,7 @@ let impose_pages fit x y columns rtl btt center margin output_mediabox fast fit_
      in
        (* Change the pattern matrices before combining resources *)
        let pages, h =
-         let r = map2 (fun p t -> Cpdfpage.change_pattern_matrices_page pdf t p) pages transforms in
+         let r = map2 (fun p t -> Cpdfpage.change_pattern_matrices_page pdf (Pdftransform.matrix_invert t) p) pages transforms in
            (r, List.hd r)
        in
      let resources' = pair_reduce (Pdfpage.combine_pdf_resources pdf) (map (fun p -> p.Pdfpage.resources) pages) in