Утверждая, что в 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
Есть ли способ выразить это побочное условие, что для суждения нет определенных выходов, определенных для определенного набора входов?