% Adapted from Logtalk eclipse_current_predicate_1_11. Modified for EyeProlog's harness.
% See test/conformance/THIRD_PARTY.md.
%% ?- current_predicate(f / -1).