Dilbert, the Next Generation

Scott Adams just held a signing session at Kepler's in Menlo Park; this 
being Menlo Park, I brought along a copy of the new specs, and as a 
result, the HTTP-NG architecture spec now sports its own Dogbert 
dedicated to the HTTP working group. Does that mean I have to give Scott 

(defun modexpt (x y n)  "computes (x^y) mod n"
  (cond ((= y 0) 1) 	((= y 1) (mod x n))
	((evenp y) (mod (expt (modexpt x (/ y 2) n) 2) n))
	(t (mod (* x (modexpt x (1- y) n)) n))))

Received on Friday, 17 November 1995 16:59:36 UTC