[Haskell-cafe] elementsinlist

[Jenny678]

Hallo
I search a code for 

>elements_in_List([1,2],[1,2]). 
>True
>elements_in_List([1,8],[1,2,3,4,8]). 
>True
>elements_in_List([2,1],[1,2]). 
>True
>elements_in_List([1,1],[1]). 
>False

I have a code
elements_in_List :: Eq a => [a] -> [a] -> Bool
elements_in_List [] _ = True
elements_in_List _ [] = False
elements_in_List (x:xs) (y:ys)
 | x == y = elements_in_List xs ys
 | True = elements_in_List (x:xs) ys

but it failed at 
>elements_in_List([2,1],[1,2]). 
>True

I hope somebody can help me 
Please don't use built-in-Functions.

Thanks for Help 


--
View this message in context: http://www.nabble.com/elementsinlist-t1782975.html#a4855615
Sent from the Haskell - Haskell-Cafe forum at Nabble.com.