;; Emacs indent settings
(mapcar #'(lambda (x) (put x 'scheme-indent-function 1))
	'(transition extend-transition role))