Couldn't match expected type `Integer' against inferred type `a b'
    In the expression:
        do let s_gal0 = coordone !! 0
           let s_gal1 = read (coordone !! 1)
           let s_gal2 = read (coordone !! 2)
           let s_reg0 = read (coordone !! 4)
           ....
    In the definition of `calcDist':
        calcDist coordone coordtwo
                   = do let s_gal0 = ...
                        let s_gal1 = ...
                        let s_gal2 = ...
                        ....