Lithium diffusion in silicate melts