1 2 3 4
start :: fn { print (1, -2, 3, -4) - (4, 3, -2, -1) (1, -2, 3, -4) - (4, 3, -2, -1) <=> (-3, -5, 5, -3) }