« Ultimate easter egg | Main | Loathing »

October 4, 2005

Coin toss

Since Brendi was asking for guesses as to the gender of her and Lare's baby I figured I'd toss a coin.

Of course, since I rarely have any cash on me I tossed a virtual coin, written in Lisp a long time ago when I first started playing with Lisp.

(defun toss ()
  (let ((num (random 101)))
	(cond ((< num 50) `heads)
		  ((> num 50) `tails)
		  ((= num 50) `edge))))

I got tails.

Posted by ed at October 4, 2005 1:08 PM

Trackback Pings

TrackBack URL for this entry:
http://weblogs.litmusgreen.com/mt-tb.cgi/695

Comments

Post a comment




Type the characters you see in the picture above.


Remember Me?