;+ ; NAME: ; MUXBLEED_LOOKUP ; ; PURPOSE: ; Calculate mux-bleed lookup table ; ; INPUTS: ; Which pixel in the lookup table to return ; ; KEYWORD PARAMETERS: ; ; CHANNEL - IRAC channel number (should be 1 or 2) ; ; OUTPUTS: ; Value of lookup table at requested pixel ; ; COMMON BLOCKS: ; None. ; ; RESTRICTIONS: ; Does not work for Channel 2 (yet), returns -1 in that case. ; (Not intended for Channels 3 and 4). ; ; PROCEDURE: ; lookup = muxbleed_lookup(100., CHANNEL = channel) ; ; COMMENTS: ; Only uses exponential; doesn't match Hora document for first 10 pixels. ; ; MODIFICATION HISTORY: ; DS '03nov14 - written ;- function muxbleed_lookup, n, $ CHANNEL = channel if n_elements(CHANNEL) eq 0 then CHANNEL = 1 if CHANNEL eq 1 then begin A = 25.715 B = -0.020951 endif lookup = A * exp(b*n) return, lookup end