10 lines
241 B
Text
10 lines
241 B
Text
Module CheckIt {
|
|
Compose = lambda (f, g)->{
|
|
=lambda f, g (x)->f(g(x))
|
|
}
|
|
Add5=lambda (x)->x+5
|
|
Division2=lambda (x)->x/2
|
|
Add5Div2=compose(Division2, Add5)
|
|
Print Add5Div2(15)=10 ' True
|
|
}
|
|
CheckIt
|