;------------------------------------------------------------- function jd2ex, jd t_ref = '1-jan-79' jd_ref = tim2jd(t_ref) offset = double(jd-jd_ref(0))*86400d t_ex = anytim2ex(anytim2ints(t_ref,off=offset)) return, t_ex end