fork(1) download 
  1. check :: (Int, String) -> [(Int, String)] -> Bool
  2.  
  3. check val [] = False
  4. check val (x:xs)
  5.     | x == val = True
  6.     | otherwise = check val xs
  7.  
  8. main = print $ check (6548712, "Charlie Brown") [(6548712, "Charlie Brown"), (27378912, "Linux Van Pelt"), (5831457, "Peppermint Patty")]
Success #stdin #stdout 0s 4584KB
comments (?)
stdin 
Standard input is empty
stdout 
True
https://ideone.com/NVw0j0
http://stackoverflow.com/q/28230139/1903116
language:
Haskell (ghc 8.4.4)
created:
10 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!