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