f=zeroBragg(x)

% Author: Housam Binous

% Pressure-volume isotherms for a Bragg-Williams lattice gas

% National Institute of Applied Sciences and Technology, Tunis, TUNISIA

% Email: [e-mail]

% Reference: T. L. Hill, An Introduction to Statistical Thermodynamics,
% Dover, New York, 1986.

function f=zeroBragg(x)

kTovercw=-0.2;

f(1)=1/x(1)+1/x(2)-1;
f(2)=log((x(2)-1)/(x(1)-1))-1/kTovercw*(1/x(2)-1/x(1));

end