Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Search
--ghc 7.10 module Main where infixr 0 ? newtype S a = S { (?) :: (a -> Bool) -> a } instance Functor S where fmap f xx = S $ \q -> f(xx ? q.f) ss xx q f = f(xx ? q.f) instance Applicative S where pure x = S (const x) ff <*> xx = S $ \p -> ss ff p $ ss xx p main = print $ "Hello, world!"
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
tried some polynoms 2: now with some `*` and foldr(-p)
mySqrt
Kleinste
project euler 1, haskel
haskell
(⁄⁄>⁄▽⁄<⁄⁄)
Niet
ReaderPractice
(Int,Int) -> Bool plot
first haskell program
Please log in to post a comment.