Skip to content

Instantly share code, notes, and snippets.

@aktowns

aktowns/gist:706459

Created November 19, 2010 12:27
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save aktowns/706459 to your computer and use it in GitHub Desktop.
Save aktowns/706459 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.fs
let rec omNoms start op from nto =
if from > nto then start
else op from (omNoms start op (from + 1) nto)
printfn "%d" (omNoms 0 (+) 1 100)
@aktowns
Copy link
Author

aktowns commented Nov 19, 2010 

def omNoms start, op, from, nto  
   return start if from > nto  
   op.call(from, (omNoms start op (from + 1) nto)  
end  

puts  omNoms(0, lambda{|x,y|x+y}, 1, 100)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment