#ありがとうございます。define-macro が昔からあってシンプルそうなので、それで対応してみます。
#あ、機能を足さないでもできることに気づきました。
(cond-expand ((library compat.real-trig) (use compat.real-trig)) (else))
でいけるはず。
#すんません、ドキュメント書いてたらモジュール名が気になりだしました。trigonometryだけじゃないんで、ちょっと長いけどcompat.real-elementary-functions とかにします。