165 insert = this%seek(
index)
166 if (.not. insert)
return 171 if (.not. this%element())
then 173 this%firstLink => newlink
174 this%lastLink => newlink
178 call newlink%setPrevLink(this%currlink)
179 call newlink%setNextLink(this%currlink%nextlink())
182 nextlink=>this%currlink%nextlink()