Предположим, мы определили функцию

f : N \to N
f 0 = 0
f (s n) = f (n/2) -- this / operator is implemented as floored division.

Агда будет рисовать f в лососе, потому что она не может сказать, если n / 2 меньше, чем n. Я не знаю, как сказать Агдеру проверку завершения. В стандартной библиотеке я вижу деление на 2 и доказательство того, что n / 2 <n. Тем не менее, я до сих пор не вижу, как заставить средство проверки завершения понять, что рекурсия была сделана в меньшей подзадаче.