(servlet ()
; insert some code here ....
(define (my-li name imagefile cost)
{
|
[name]
|
- Cost: $[cost]
- Tax: $[(* cost 0.05)]
- Total: $[(* cost 1.05)]
|
})
{
Posters for Sale
[(list
(my-li "The Dew" "dew.jpg" 15.00)
(my-li "Abstract #17" "foil.jpg" 13.50)
(my-li "Childhood Remembered" "sueno.jpg" 20.00)
(my-li "Catview" "table.jpg" 16.00)
(my-li "Still Life in Toys" "toys.jpg" 13.00)
)]
}
)