view paper/src/exec_list_monad.txt @ 92:0354d3693324 default tip

Added tag paper_final for changeset 6a12eb22be8c
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Sun, 01 Mar 2015 13:08:51 +0900
parents 1181b4facaf9
children
line wrap: on
line source

*Main> let x = Cons 100 (Cons 200 (Cons 400 Nil))
*Main> let f = \x -> Cons (x+1) (Cons (x+10) (Cons (x*x) Nil))
*Main> x >>= f
Cons 101 (Cons 110 (Cons 10000 (Cons 201 (Cons 210 (Cons 40000 (Cons 401 (Cons 410 (Cons 160000 Nil))))))))