4 lines
96 B
R
4 lines
96 B
R
|
|
Y <- function(f) {
|
||
|
|
(function(x) { (x)(x) })( function(y) { f( (function(a) {y(y)})(a) ) } )
|
||
|
|
}
|