mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-30 16:54:41 +00:00
17 lines
154 B
Plaintext
17 lines
154 B
Plaintext
:- module followcode_det_problem.
|
|
|
|
:- pred p(int::out) is semidet.
|
|
|
|
p(X) :-
|
|
(
|
|
Z = 3
|
|
;
|
|
Z = 4
|
|
),
|
|
Z = 4,
|
|
q(X).
|
|
|
|
:- pred q(int::out) is det.
|
|
|
|
q(42).
|