Count the number of times a rule is declared - SWIProlog

Question

I\'d like to count the number of times a certain predicate has been declared.

For example "my_predicate/3":

        my_predicate(1,A,B) :- A