if ((lon_tmp1.LE.lon_cur).AND.
&(lon_tmp2.GT.lon_cur)) then
distance2=(lon_cur-lon_1)/(lon_2-lon_1)
I lon_cur,
_RL lon_cur,lat_cur