Li-Fan Chen says to YSITD
let Y = f => (x=>f(x(x))(x=>f(x(x)))