Viscosity measurement of subliquidus magmas: 1707 basalt of Fuji volcano