hasArg c (x:y:ys) = if x == c && y == ':'
                    then True
                    else hasArg c (y:ys)
hasArg c (x:y:ys) = if x == c && y == ':'
                    then True
                    else hasArg c (y:ys)
hasArg c (x:y:ys) = if x == c && y == ':'
                    then True
                    else hasArg c (y:ys)