2: #include src/dm/ao/aoimpl.h 6: /*@C 7: AODataAddAlias - Allows accessing a key or field using an alternative 8: name. 10: Not collective 12: Input Parameters: 13: + ao - the AOData database 14: . alias - substitute name that may be used 15: - name - name the alias replaces 17: Level: intermediate 19: .keywords: aliases, keys, fields 21: .seealso: 22: @*/ 23: PetscErrorCode AODataAddAlias(AOData ao,char *alias,char *name) 24: { 25: AODataAlias *aoalias,*t; 31: PetscNew(AODataAlias,&aoalias); 32: PetscStrallocpy(alias,&aoalias->alias); 33: PetscStrallocpy(name,&aoalias->name); 34: aoalias->next = PETSC_NULL; 36: if (!ao->aliases) { 37: ao->aliases = aoalias; 38: } else { 39: t = ao->aliases; 40: while (t->next) t = t->next; 41: t->next = aoalias; 42: } 44: return(0); 45: }