(**************************************************************************)
universe constraint Type[0] < Type[1].
-universe constraint CProp[0] < CProp[1].
-universe constraint Type[0] ≤ CProp[0].
-universe constraint CProp[0] ≤ Type[0].
-universe constraint Type[1] ≤ CProp[1].
-universe constraint CProp[1] ≤ Type[1].
+universe constraint Type[1] < Type[2].
+universe constraint Type[2] < Type[3].