let a:i=sort(getline(1,'$'))
enew
p=s:i
1 delete _