Experimental study of phase relations in a lithium-bearing fluorine-rich haplogranite and nepheline syenite system