discount(_customer,_product,5.0 percent) :- premium(_customer), regular(_product).
discount(_customer,_product,7.5 percent) :- premium(_customer), luxury(_product).
premium(_customer) :- spending(_customer,min 5000 euro,previous year).
luxury(Porsche).
regular(Honda).
spending(Peter Miller,min 5000 euro,previous year).