(descuentoempanada (cons (make-empanada 200 1000 80 )
                         (cons (make-chorizo 500 3000 'azul)
                             (cons (make-papa-rellena 500 1800)
                                 (cons (make-chunchulo 500 60 15) empty)))) 10)