progress in own-types.hs
add person.hs