Embedding Attribute Grammars using Functional Zippers