let amp_ctyp = Gram.Entry.mk "amp_ctyp"