The node you are looking for is at go to the DATA-LENS․LENSES∶∶CLONE COMMON-LISP∶∶T AROUND method.