diff --git a/encodings/prenex.lp b/encodings/prenex.lp index e2b4901cfe57eca93bcf3c5086cb2df2c17b3a8a..441eeda5f020779a6811cf8349c8515cb6d88047 100644 --- a/encodings/prenex.lp +++ b/encodings/prenex.lp @@ -29,3 +29,10 @@ rule χ (∀S $e) ↪ Î t: Set, χ ($e t) constant symbol ∀B: (Set → Bool) → Bool rule ε (∀B $p) ↪ Î x: Set, ε ($p x) + +// Since PVS supports dependent types through theory formal parameters, we allow +// prenex quantifications on elements “e: T†with “T: TYPE†in elements of type +// “Kindâ€. +set declared "∀k" +constant symbol ∀k {t: Set}: (η t → SchemeK) → SchemeK +rule Ï• (∀k {$t} $e) ↪ Î t: η $t, Ï• ($e t)