(ProductLog[1,-Exp[-1]]+1)/2