Make Demo in tests fails

[parthshah31]

make demo in the Tests/ folder fails with this issue.

Penrose.hs:105:41: error:
    • Couldn't match type ‘Double’ with ‘Int’
      Expected type: Int
        Actual type: PDFFloat
    • In the third argument of ‘PDFRect’, namely ‘(1.5 * width)’
      In the first argument of ‘Just’, namely
        ‘(PDFRect 0 0 (1.5 * width) width)’
      In the first argument of ‘addPage’, namely
        ‘(Just (PDFRect 0 0 (1.5 * width) width))’
    |
105 |     page <- addPage (Just (PDFRect 0 0 (1.5*width) width))
    |                                         ^^^^^^^^^