A.58 library(terms): Term manipulation
All Application Manual Name SummaryHelp

Availability::- use_module(library(terms)).(can be autoloaded)
Source[semidet]same_functor(?Term1, ?Term2)
[semidet]same_functor(?Term1, ?Term2, -Arity)
[semidet]same_functor(?Term1, ?Term2, ?Name, ?Arity)
True when Term1 and Term2 are terms that have the same functor (Name/Arity). The arguments must be sufficiently instantiated, which means either Term1 or Term2 must be bound or both Name and Arity must be bound.

If Arity is 0, Term1 and Term2 are unified with Name for compatibility.

Compatibility
SICStus
ClioPatria (version V3.1.1-51-ga0b30a5)