The functions {tt adjoin} and {tt remove} construct lists by adding or removing objects from the lists specified as their arguments.
(Nth-Domain Adjoin 3 List) (Nth-Domain Adjoin 2 List)
(<- (Adjoin ?X ?List) (If (Item ?X ?List) ?List (Cons ?X ?List)))