(character (attributes (str 12)
		       (con 15)
		       (dex 9)
		       (int 16))
	   (hp (+ attributes-con (d 1 10)))
	   (skills (jump +2)
		   (read-magic +5)
		   (lore +4))
	   (spells (fireball (lambda () (deal-damage (+ attributes-int (d 4 6)))))))