Did you know ... Search Documentation:
Predicate current_type/3