fork download
copy 
  1. mylength :: [Int] -> Int
  2. mylength l = foldr f 0 l
  3.     where
  4.         f :: Int -> Int -> Int
  5.         f x y = y+1
  6.  
  7.  
  8. main :: IO ()
  9. main = print (mylength [1,2,3,4])
Success #stdin #stdout 0s 4392KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
4
https://ideone.com/CZVd6R
language:
Haskell (ghc 8.4.4)
created:
7 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!