Утверждая, что в Redex не существует выхода для суждения

У меня есть отношение, определенное в PLT Redex, которое принимает два входа и выхода.

(define-judgment-form
  L
  #:mode (Meet I I O)

 [---------------------------
  (Meet xpr xpr xpr)]
)

По другому мнению, я хотел бы иметь в качестве побочного условия, что не существует выхода для двух заданных входов. Я попытался сформулировать это как:

(side-condition (empty? (judgment-holds (Meet xpr1 xpr2 xpr3) xpr3)))

т.е. xpr1 а также xpr2 связаны исходные данные из предпосылки решения, и xpr3 метавариабельная для вывода.

но я получаю следующую ошибку:

term: judgment forms with output mode ("O") positions disallowed

Есть ли способ выразить это побочное условие, что для суждения нет определенных выходов, определенных для определенного набора входов?

0 ответов

Другие вопросы по тегам