list-set! implemented

about imutable list object,  imperfect.