(require 2htdp/image)


;; Image -> Boolean
;; compares two images to see if first is bigger then second
(check-expect (bigger? (rectangle 5 9 "solid" "red")) true)
(check-expect (bigger? (rectangle 4 2 "solid" "blue")) false)
 
;(define (bigger? img) false)
;(define (bigger2? img) true)  ;stub

; (define (bigger? img)
; define (bigger2? img) ;template

(define (bigger? img1 img2)
  (* image-height img1) (image-width img1)
  (* image-height img2) (image-width img2)
  (if img1 > img 2)
  true
  false)