(car '(and aaa)) が正しく評価できなかった件を修正