<> <> <> <> DIRECTORY CD; CDPropertyTools: CEDAR DEFINITIONS = BEGIN <> <> RemoveProperties: PROC[key: ATOM]; <<--removes this property from all layers and all associated properties from this atom>> <<--exclusive properties are ignored>> Associate: PROC [key, a: ATOM]; <<--associates a to key, such that RemoveProperties will remove the a property from key>> <<--exclusive properties are ignored>> <<>> END.