#lang scheme/base
(provide underscore-allowed) 
(define underscore-allowed '(any number string variable variable-not-otherwise-mentioned natural integer real))