| Exists of loc
| Fold of loc * reduction_kind * 'term
| Fourier of loc
+ | Generalize of loc * 'term * ('term, 'ident) pattern
| Goal of loc * int (* change current goal, argument is goal number 1-based *)
| Injection of loc * 'ident
| Intros of loc * int option * 'ident list