最大値・最小値を求める - lisp-cookbook-ja/common-lisp GitHub Wiki
最大値・最小値を求める
max, min 関数を用いることができます, 複数値の入力に対応しています。
(max 1 5 4 3 2)
;=> 5
(max 1 5.3 -2.5 3e1)
;=> 30.0
(max 10000000000001d0 1.01d10)
;=> 1.0000000000001d13
(min 1 5 3 2 10)
;=> 1
(min 1 500.3 -2.5 3e1)
;=> -2.5
(min -1.00000001d0 -1.1)
;=> -1.1