Невозможно показать, что Prop
неисчислимо внутри Coq. Модуль ClassicalFacts в стандартной библиотеке показывает, что аксиома вырожденного высказывания forall A : Prop, A = True \/ A = False
эквивалентна наличию исключенной средней и пропозициональной экстенсиональности. Поскольку теоретическая модель множества Кока подтверждает эти две аксиомы, Кок не может опровергнуть вырождение.
Конечно, можно показать, что Set
и Type
бесконечны, так как они содержат все типы Fin n
натуральных чисел, ограниченные n
, и эти типы доказуемо отличаются друг от друга, так как имеют разные кардинальное. Я подозреваю, что можно показать, что они неисчислимы, адаптируя обычный аргумент диагонализации - то есть предположим, что некоторая обратимая функция подсчета e : nat -> Set
, и попытаться закодировать что-то вроде типа всех натуральных чисел, которые «не содержат самих себя". Я не знаю, как вы будете доказывать, что эти типы - недоступные кардиналы.