我如何实施购物清单，根据传入的假日，它应该返回该假期各方所有成分的清单。
例如，shoppinglist（万圣节，X）应该返回糖，水。
/* Facts */
sides(halloween, candy).
sides(halloween, soda).
ingredient(candy, sugar).
ingredient(soda, water).
/* Rules */
/* return a list of all ingredients needed for holiday */
shoppinglist(Holiday, List) :-