fix regression in Phone.hs
Improve DNA