Попытка вернуть первые 2 цифры в схеме

Question

Я пытаюсь проверить, если я меньше 3-х цифр, если он возвращается, иначе рекурсивно вызовите first2 с i/10, пока оно не станет меньше двух цифр. С моей логикой кажется, что 12345 должен вернуться 12.345, и я мог бы найти другой способ отрезать десятичную, но он просто возвращает 100. Почему это? Я искал примеры этой логики, и, похоже, это должно сработать. Это не имеет никакого смысла для меня.

(define(first2 i) 

    (cond(< i 100) 

     (i) 

     (first2 (/ i 10)))) 

> (first2 12345) 

100 

Answer 1

Изменено его в том и посмотрел ошибку, выясняли возвратную я значение не может иметь() вокруг него, так как его не в порядке.

(define(first2 i) 

    (if(< i 100) 

     i 

     (first2 (/ i 10)))) 

> (first2 12345) 
12