I wrote a simple ps macro to work like CL's log. It seems like a candidate for inclusion in PS itself.

Daniel

(defpsmacro log (number &optional base)
(cond ((null base) `(*math.log ,number))
((= base 10) `(* (log ,number) *math.*log10e*))
(t `(/ (log ,number) (log ,base)))))