Loading interpol_param.pro +6 −1 Original line number Diff line number Diff line Loading @@ -14,6 +14,11 @@ function interpol_param, table, par_name, date, empty_params = empty_params par_val = par_val[s] par_date = par_date[s] jul_date = date_conv(date, 'JULIAN') if jul_date ge min(par_date) and jul_date le max(par_date) then value = interpol(float(par_val), par_date, jul_date) else value = 0.0 if jul_date ge min(par_date) and jul_date le max(par_date) then value = interpol(float(par_val), par_date, jul_date) else begin ; value = 0.0 journal, 'Error 01: parameter not found in house-keeping dump table.' journal exit, status = 1 endelse if finite(value) then return, value else return, 0.0 end Loading
interpol_param.pro +6 −1 Original line number Diff line number Diff line Loading @@ -14,6 +14,11 @@ function interpol_param, table, par_name, date, empty_params = empty_params par_val = par_val[s] par_date = par_date[s] jul_date = date_conv(date, 'JULIAN') if jul_date ge min(par_date) and jul_date le max(par_date) then value = interpol(float(par_val), par_date, jul_date) else value = 0.0 if jul_date ge min(par_date) and jul_date le max(par_date) then value = interpol(float(par_val), par_date, jul_date) else begin ; value = 0.0 journal, 'Error 01: parameter not found in house-keeping dump table.' journal exit, status = 1 endelse if finite(value) then return, value else return, 0.0 end