Как получить тип значения в Scheme?

Мне нужна функция, которая получает тип значения во время выполнения. Пример использования:

(get-type a)

где aбыло defined как некоторое произвольное значение Схемы.

Как мне это сделать? Или мне нужно реализовать это самому, используя стек условий boolean?, number?и т. д.?