let @z=":s/x/ /g
0wi\n\ewi\n\ekkVjj:sort n
3J"
let @a="ggVG:normal @z
:%s/\\([^ ]*\\) \\([^ ]*\\) \\([^ ]*\\)/\\1*\\2+2*\\1*\\2+2*\\1*\\3+2*\\2*\\3
:%s/ *\\n/+/
:%s/+$//g
ggVd:put =eval(@@)
"