once/1
once(+P)
once(
)
Equivalent to:
P -> true ; fail.
Cuts in P do not make sense, but they are allowed, their scope being the goal P.
Call errors (see ref-sem-exc).
ref-sem.