function value=logpost(x,data)



s=data(1); f=data(2);

value=s*x-(s+f)*log(1+exp(x))-log(1+x.^2);

