listMinus :: [Entity Item] -> [Entity Item] -> [Entity Item]
listMinus items inv = filter (((not .) .) itemInInventory inv) items
listMinus :: [Entity Item] -> [Entity Item] -> [Entity Item]
listMinus items inv = filter (((not .) .) itemInInventory inv) items
listMinus items inv = filter (((not .) .) itemInInventory inv) items