| NCut of loc * CicNotationPt.term
(* | NDiscriminate of loc * CicNotationPt.term
| NSubst of loc * CicNotationPt.term *)
| NCut of loc * CicNotationPt.term
(* | NDiscriminate of loc * CicNotationPt.term
| NSubst of loc * CicNotationPt.term *)
| NLApply of loc * CicNotationPt.term
| NLetIn of loc * npattern * CicNotationPt.term * string
| NReduce of loc * [ `Normalize of bool | `Whd of bool ] * npattern
| NLApply of loc * CicNotationPt.term
| NLetIn of loc * npattern * CicNotationPt.term * string
| NReduce of loc * [ `Normalize of bool | `Whd of bool ] * npattern
type ('term,'obj) command =
| Index of loc * 'term option (* key *) * UriManager.uri (* value *)
type ('term,'obj) command =
| Index of loc * 'term option (* key *) * UriManager.uri (* value *)