不明な式を解析するのに便利そうなので作ってみた。1〜100までのx,yを使ってx/yを作り、整数値となるものを外してソートするだけである。下のコードは手抜きのため、非常に遅いので実行する際は注意。 ;分数早見表を作る。 (let (l) (dotimes (a 100) (dotim…

;世界があった。 (defvar *the-world* nil) ;神はケーキを作った。 (push '(cake) *the-world*) >((cake)) ;神は人間を作った。 (push '(person) *the-world*) >((person) (cake)) ;神は人間にケーキを食べさせた。 (set-status ;疑似コード '((a person) -i…