(define ( . l) ( (map (lambda (i) ( :onclick ~(alert $i) i)) l))) ( ( ( 1 2 3)))