>>80-84
ソースありがとうございます！xyzzyで実行したのですが、memqで怒られました。
シンボルの一致のeqlのことでしょうか？そこを変えて実行したら以下のようになりました。
まだスタックが使えないのでエラーの原因がわかりませんが・・・。

(calculate '(1 + 2 * 3 + (43 - 3)))　→　1