X-Git-Url: http://challenge-bot.com/repos/?a=blobdiff_plain;ds=sidebyside;f=bill-of-materials.rkt;h=4f3b74a4bdf4700bbc29a3ecacd91f8a0fb9e0c7;hb=a76f86535dc18d4392ab976100d60efb950a37d7;hp=a5af0342e4afe6a00737e9a70eae6b8cdf85e6eb;hpb=845aa5f98e85450f1cec5177837654898b1db4e6;p=challenge-bot diff --git a/bill-of-materials.rkt b/bill-of-materials.rkt index a5af034..4f3b74a 100755 --- a/bill-of-materials.rkt +++ b/bill-of-materials.rkt @@ -26,7 +26,7 @@ (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") @@ -39,7 +39,10 @@ (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])