Ze znalosti teploty normálního bodu tání a změny enthalpie v bodě tání, lze

za předpokladu ideálního chování kapalné fáze odvodit vztah mezi teplotou

a složením kapaliny. Pro benzen tedy platí

> x1:=exp(dH1/R*(1/T1-1/T));

Obdobně pro naftalen

> x2:=exp(dH2/R*(1/T2-1/T));

Dosadíme vstupní data

> R:=8.314;

> T1:=278.7; dH1:=9840;

> T2:=353.4; dH2:=18800;

Nejprve vypočteme vzájemné rospustnosti při 273.15 K

> evalf(subs(T=273.15,x1));

> evalf(subs(T=273.15,x2));

V eutektickém bodě je součet molárních zlomků benzenu rozpuštěného v naftalenu

a naftalenu rozpuštěného v benzenu roven jedné.

> rov:=x1+x2=1;

Řešení této rovnice dostáváme eutektickou teplotu a složení

> TE:=fsolve(rov,T);

> evalf(subs(T=TE,x1));

> evalf(subs(T=TE,x2));

Celou fázovou rovnováhu pak můžeme znázornit graficky

> plot({[x1,T-273.15,T=TE..T1],[1-x2,T-273.15,T=TE..T2],[x,TE-273.15,x=0..1]},color=red,view=[0..1,-10..85],axes=boxed,thickness=3);

>