constructions on constructors in Agda