(string-append
"http://www.officedepot.com/"
"a/products/495242/Scotch-Permanent-Double-Sided-Foam-Tape/"))
- (item "#4-40 Phillips 1/2 inch flat-head screws"
+ (item "#4-40 Phillips 1 1/4 inch flat-head screws"
3 .1 1 "home depot, lowes")
(item "#4-40 hex nuts"
6 .1 1 "home depot, lowes")
(item "Green LEDs"
2 .1 1 "evil mad science?")
(item "330 Ohm Resistors"
- 6 .1 1 "evil mad science?")))
+ 6 .1 1 "evil mad science?")
+ (item "motor controller"
+ 1 (/ 5.2 5) 10 (string-append "http://www.ebay.com/"
+ "itm/like/180976411359?lpid=82"))))
(define total-cost
(apply + (for/list ([thing bill-of-materials])