(check-expect (contract-points 3 'clubs false false) 60)
(check-expect (contract-points 3 'clubs true false) 120)
(check-expect (contract-points 3 'clubs true true) 240)
(check-expect (contract-points 5 'diamonds false false) 100)
(check-expect (contract-points 5 'diamonds true false) 200)
(check-expect (contract-points 5 'diamonds true true) 400)
(check-expect (contract-points 2 'hearts false false) 60)
(check-expect (contract-points 2 'hearts true false) 120)
(check-expect (contract-points 2 'hearts true true) 240)
(check-expect (contract-points 6 'spades false false) 180)
(check-expect (contract-points 6 'spades true false) 360)
(check-expect (contract-points 6 'spades true true) 720)
(check-expect (contract-points 4 'NT false false) 130)
(check-expect (contract-points 4 'NT true false) 260)
(check-expect (contract-points 4 'NT true true) 520)
(check-expect (contract-points 1 'NT false false) 40)
(check-expect (contract-points 1 'NT true false) 80)
(check-expect (contract-points 1 'NT true true) 160)