; signature: rect-area: number number -> number
; purpose: expects a length and width of a rectangle (in the
; same units) and produces that rectangle's area (in square
; units)
(define (rect-area length width)
(* length width)
)
(check-expect (rect-area 20 5)
100)
(rect-area 20.567 34)