Did you know ... Search Documentation:
Predicate current_functor/2