function norh_ut2jst,timein,yohkoh=yohkoh,ccsds=ccsds,ints=ints,ex=ex


if   ((not keyword_set(yohkoh)) $
  and (not keyword_set(ints)) $
  and (not keyword_set(ex)) $
     ) then ccsds=1

  timeo=anytim(anytim2ints(anytim(timein,/ints) $
    ,offset=+9.*60.*60),ccsds=ccsds,yohkoh=yohkoh,ints=ints,ex=ex)


return,timeo
end