Gjuro Chensen wrote:
> 
> 
> /cut
> 
> 

I dont know everyone will see this, but I would like thank everyone who
found time to help, and not spam too much doing it:D. 
Well, I did it! Its not great (especially comparing to those one line
solutions, wow!), but it works.

module Main where

startsWithUpper :: String -> Bool
startsWithUpper []= False
startsWithUpper string =
        if myIsUpper(head(string)) then True 
        else False
        
myIsUpper :: Char -> Bool
myIsUpper x =
        if x>='A' && x <= 'Z' then True 
        else False
        
checkAll string = check (words string)

check :: [String] -> Bool
check []=False
check x = 
        if all startsWithUpper x then True
        else False


Since importing modules isnt allowed, I made my own isUpper. And thats it,
for few days of Haskell, Im happy.

Once again, many many thanks to everyone!


-- 
View this message in context: 
http://www.nabble.com/Haskell---string-to-list-isusses%2C-and-more-tp24022673p24023759.html
Sent from the Haskell - Haskell-Cafe mailing list archive at Nabble.com.

_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to