Couldn't match expected type `String' against inferred type `Char'
    In the first argument of `read', namely `((coordone !! 1))'
    In the expression: read ((coordone !! 1))
    In the definition of `s_gal1': s_gal1 = read ((coordone !! 1))