let a_FLOAT = Gram.Entry.mk "a_FLOAT"