is mentioned by

Thm* a,tr,P:Top. [a / tr] | P ~ if P(kind(a)) [a / tr | P] else tr | P fi	[trace_projection_cons]
Thm* P:Top. nil | P ~ nil	[trace_projection_nil]

In prior sections: mb basic mb declaration

Try larger context: GenAutomata