computeGradient a b | (XCoord b) - (XCoord a) == 0 = foo | otherwise = ((YCoord b) - (YCoord a)) / ((XCoord b) - (XCoord a))