function get_light_trvl_off,offdate ;+ ; $Id: get_light_trvl_off.pro,v 1.2 2008/06/18 18:41:22 mcnutt Exp $ ; ; Project : STEREO SECCHI ; ; Name : get_light_trvl_off ; ; Purpose : to calculate onboard SECCHI-B light travel offset time ; ; Explanation: ; ; Use : IDL> offset_seconds=get_light_trvl_off(yyyy-mm-dd) ; ; Inputs :offdate yyyy-mm-dd ; ; Outputs : offset time in seconds based on lightbb.cpp tables ; ; Keywords : ; ; ; Restrictions: Needs to be update with new tables values when lightbb.cpp is updated on the Spacecraft. ; ; Side effects: ; ; Category : ; ; Prev. Hist. : None. ; ; Written :Lynn McNutt 2008 ; ; $Log: get_light_trvl_off.pro,v $ ; Revision 1.2 2008/06/18 18:41:22 mcnutt ; returns first table value for date before launch ; ; Revision 1.1 2008/06/18 18:08:45 mcnutt ; return onboard light travel offset in seconds ; date111=[ 1590969600ul, 1591315200ul, 1591660800ul, 1592006400ul, 1592352000ul,$ 1592697600ul, 1593043200ul, 1593388800ul, 1593734400ul, 1594080000ul,$ 1594425600ul, 1594771200ul, 1595116800ul, 1595462400ul, 1595808000ul,$ 1596153600ul, 1596499200ul, 1596844800ul, 1597190400ul, 1597536000ul,$ 1597881600ul, 1598227200ul, 1598572800ul, 1598918400ul, 1599264000ul,$ 1599609600ul, 1599955200ul, 1600300800ul, 1600646400ul, 1600992000ul,$ 1601337600ul, 1601683200ul, 1602028800ul, 1602374400ul, 1602720000ul,$ 1603065600ul, 1603411200ul, 1603756800ul, 1604102400ul, 1604448000ul,$ 1604793600ul, 1605139200ul, 1605484800ul, 1605830400ul, 1606176000ul,$ 1606521600ul, 1606867200ul, 1607212800ul, 1607558400ul, 1607904000ul,$ 1608249600ul, 1608595200ul, 1608940800ul, 1609286400ul, 1609632000ul,$ 1609977600ul, 1610323200ul, 1610668800ul, 1611014400ul, 1611360000ul,$ 1611705600ul, 1612051200ul, 1612396800ul, 1612742400ul, 1613088000ul,$ 1613433600ul, 1613779200ul, 1614124800ul, 1614470400ul, 1614816000ul,$ 1615161600ul, 1615507200ul, 1615852800ul, 1616198400ul, 1616544000ul,$ 1616889600ul, 1617235200ul, 1617580800ul, 1617926400ul, 1618272000ul,$ 1618617600ul, 1618963200ul, 1619308800ul, 1619654400ul, 1620000000ul,$ 1620345600ul, 1620691200ul, 1621036800ul, 1621382400ul, 1621728000ul,$ 1622073600ul, 1622419200ul, 1622764800ul, 1623110400ul, 1623456000ul,$ 1623801600ul, 1624147200ul, 1624492800ul, 1624838400ul, 1625184000ul] offset111= [ 46647ul, 48085ul, 49485ul, 50842ul, 52150ul,$ 53404ul, 54599ul, 55732ul, 56798ul, 57793ul,$ 58714ul, 59558ul, 60322ul, 61004ul, 61601ul,$ 62111ul, 62535ul, 62869ul, 63113ul, 63268ul,$ 63332ul, 63306ul, 63191ul, 62986ul, 62694ul,$ 62315ul, 61851ul, 61305ul, 60677ul, 59971ul,$ 59187ul, 58333ul, 57407ul, 56418ul, 55366ul,$ 54257ul, 53093ul, 51879ul, 50620ul, 49320ul,$ 47985ul, 46620ul, 45229ul, 43819ul, 42395ul,$ 40962ul, 39526ul, 38093ul, 36670ul, 35261ul,$ 33874ul, 32514ul, 31186ul, 29897ul, 28653ul,$ 27459ul, 26321ul, 25244ul, 24233ul, 23294ul,$ 22430ul, 21646ul, 20946ul, 20334ul, 19812ul,$ 19384ul, 19051ul, 18816ul, 18679ul, 18642ul,$ 18704ul, 18865ul, 19125ul, 19482ul, 19934ul,$ 20479ul, 21113ul, 21834ul, 22638ul, 23520ul,$ 24476ul, 25501ul, 26590ul, 27736ul, 28936ul,$ 30181ul, 31467ul, 32787ul, 34135ul, 35504ul,$ 36889ul, 38283ul, 39679ul, 41072ul, 42456ul,$ 43825ul, 45172ul, 46494ul, 47784ul, 49038ul] date110= [1564617600ul, 1564876800ul, 1565136000ul, 1565395200ul, 1565654400ul,$ 1565913600ul, 1566172800ul, 1566432000ul, 1566691200ul, 1566950400ul,$ 1567209600ul, 1567468800ul, 1567728000ul, 1567987200ul, 1568246400ul,$ 1568505600ul, 1568764800ul, 1569024000ul, 1569283200ul, 1569542400ul,$ 1569801600ul, 1570060800ul, 1570320000ul, 1570579200ul, 1570838400ul,$ 1571097600ul, 1571356800ul, 1571616000ul, 1571875200ul, 1572134400ul,$ 1572393600ul, 1572652800ul, 1572912000ul, 1573171200ul, 1573430400ul,$ 1573689600ul, 1573948800ul, 1574208000ul, 1574467200ul, 1574726400ul,$ 1574985600ul, 1575244800ul, 1575504000ul, 1575763200ul, 1576022400ul,$ 1576281600ul, 1576540800ul, 1576800000ul, 1577059200ul, 1577318400ul,$ 1577577600ul, 1577836800ul, 1578096000ul, 1578355200ul, 1578614400ul,$ 1578873600ul, 1579132800ul, 1579392000ul, 1579651200ul, 1579910400ul,$ 1580169600ul, 1580428800ul, 1580688000ul, 1580947200ul, 1581206400ul,$ 1581465600ul, 1581724800ul, 1581984000ul, 1582243200ul, 1582502400ul,$ 1582761600ul, 1583020800ul, 1583280000ul, 1583539200ul, 1583798400ul,$ 1584057600ul, 1584316800ul, 1584576000ul, 1584835200ul, 1585094400ul,$ 1585353600ul, 1585612800ul, 1585872000ul, 1586131200ul, 1586390400ul,$ 1586649600ul, 1586908800ul, 1587168000ul, 1587427200ul, 1587686400ul,$ 1587945600ul, 1588204800ul, 1588464000ul, 1588723200ul, 1588982400ul,$ 1589241600ul, 1589500800ul, 1589760000ul, 1590019200ul, 1590278400ul] offset110=[ 64376ul, 64392ul, 64354ul, 64260ul, 64113ul,$ 63911ul, 63656ul, 63348ul, 62988ul, 62577ul,$ 62115ul, 61604ul, 61044ul, 60437ul, 59785ul,$ 59088ul, 58347ul, 57566ul, 56744ul, 55885ul,$ 54989ul, 54059ul, 53097ul, 52105ul, 51085ul,$ 50039ul, 48969ul, 47879ul, 46770ul, 45644ul,$ 44505ul, 43355ul, 42197ul, 41033ul, 39866ul,$ 38699ul, 37535ul, 36376ul, 35227ul, 34087ul,$ 32961ul, 31852ul, 30763ul, 29697ul, 28656ul,$ 27642ul, 26659ul, 25710ul, 24796ul, 23920ul,$ 23085ul, 22293ul, 21546ul, 20846ul, 20196ul,$ 19597ul, 19050ul, 18558ul, 18122ul, 17743ul,$ 17422ul, 17160ul, 16958ul, 16817ul, 16737ul,$ 16719ul, 16761ul, 16865ul, 17030ul, 17255ul,$ 17540ul, 17884ul, 18286ul, 18745ul, 19259ul,$ 19828ul, 20448ul, 21119ul, 21838ul, 22604ul,$ 23413ul, 24265ul, 25156ul, 26084ul, 27046ul,$ 28040ul, 29063ul, 30112ul, 31184ul, 32276ul,$ 33386ul, 34510ul, 35646ul, 36790ul, 37940ul,$ 39093ul, 40246ul, 41396ul, 42540ul, 43676ul] date18=[ 1545782400u, 1546041600u, 1546300800u, 1546560000u, 1546819200u,$ 1547078400u, 1547337600u, 1547596800u, 1547856000u, 1548115200u,$ 1548374400u, 1548633600u, 1548892800u, 1549152000u, 1549411200u,$ 1549670400u, 1549929600u, 1550188800u, 1550448000u, 1550707200u,$ 1550966400u, 1551225600u, 1551484800u, 1551744000u, 1552003200u,$ 1552262400u, 1552521600u, 1552780800u, 1553040000u, 1553299200u,$ 1553558400u, 1553817600u, 1554076800u, 1554336000u, 1554595200u,$ 1554854400u, 1555113600u, 1555372800u, 1555632000u, 1555891200u,$ 1556150400u, 1556409600u, 1556668800u, 1556928000u, 1557187200u,$ 1557446400u, 1557705600u, 1557964800u, 1558224000u, 1558483200u,$ 1558742400u, 1559001600u, 1559260800u, 1559520000u, 1559779200u,$ 1560038400u, 1560297600u, 1560556800u, 1560816000u, 1561075200u,$ 1561334400u, 1561593600u, 1561852800u, 1562112000u, 1562371200u,$ 1562630400u, 1562889600u, 1563148800u, 1563408000u, 1563667200u,$ 1563926400u, 1564185600u, 1564444800u, 1564704000u, 1564963200u,$ 1565222400u, 1565481600u, 1565740800u, 1566000000u, 1566259200u,$ 1566518400u, 1566777600u, 1567036800u, 1567296000u, 1567555200u,$ 1567814400u, 1568073600u, 1568332800u, 1568592000u, 1568851200u,$ 1569110400u, 1569369600u, 1569628800u, 1569888000u, 1570147200u,$ 1570406400u, 1570665600u, 1570924800u, 1571184000u, 1571443200u] offset18=[ 674u, 924u, 1208u, 1533u, 1905u,$ 2336u, 2844u, 3460u, 4247u, 5364u,$ 6658u, 7948u, 9089u, 10119u, 11081u,$ 12003u, 12905u, 13798u, 14693u, 15596u,$ 16512u, 17446u, 18400u, 19375u, 20374u,$ 21396u, 22442u, 23511u, 24604u, 25718u,$ 26853u, 28008u, 29180u, 30368u, 31569u,$ 32782u, 34004u, 35234u, 36467u, 37703u,$ 38938u, 40170u, 41396u, 42613u, 43820u,$ 45013u, 46190u, 47349u, 48486u, 49601u,$ 50689u, 51750u, 52780u, 53778u, 54741u,$ 55669u, 56558u, 57407u, 58214u, 58978u,$ 59697u, 60369u, 60994u, 61571u, 62097u,$ 62573u, 62997u, 63369u, 63687u, 63951u,$ 64162u, 64317u, 64418u, 64464u, 64455u,$ 64392u, 64273u, 64100u, 63874u, 63594u,$ 63261u, 62876u, 62441u, 61955u, 61419u,$ 60836u, 60206u, 59531u, 58811u, 58049u,$ 57247u, 56405u, 55526u, 54611u, 53663u,$ 52683u, 51674u, 50638u, 49577u, 48494u] date=[date18,date110,date111] offset=[offset18,offset110,offset111] date=double(date) offtai=utc2tai(anytim2utc(offdate)) if offtai gt max(date) then begin offout=offset(n_Elements(offset)-1)/1e3 print,'*** OFFSET TABLE IS OUT OF DATE PRO NEEDS TO BE UPDATED WITH THE LATEST lightbb.cpp table values ***' endif else if offtai lt min(date) then begin offout=offset(0)/1e3 print,'*** DATE IS BEFORE SECCHI LAUNCH AND INVALID returning first table value ***' endif else begin dates=[date,offtai] dates=dates(sort(dates)) z=where(dates eq offtai) offsets=spline(date,offset,dates) offout=offsets(z)/1e3 endelse return,offout end