% Adapted from Logtalk sics_current_op_3_41. Modified for EyeProlog's harness.
% See test/conformance/THIRD_PARTY.md.
%% ?- current_op(1201, _, _).