I'm developing a library for googology in Coq. I ran into a problem.
Set Universe Polymorphism.
Set Polymorphic Inductive Cumulativity.
Inductive Sum@{i j} (A : Type@{i}) (B : Type@{j}) : Type@{max(i,j)}
:= left : A -> Sum A B | right : B -> Sum A B.
Definition Foo@{i j k l} (A : Type@{i}) (B : Type@{j}) (C : Type@{k}) : Type@{l}
:= Sum@{i _} A (Sum@{j k} B C).
I expected _
to be filled with max(j,k)
. However, I got an error:
Universes {***} are unbounded.
Is there a way to express these constraints well?