...
In the procedure $XIDL_DIR/SPEC/ARCS/x_fndpeaks.pro, line 100 insert the following (in black; original code in gray):
autofit = x_calcfit(xdat, FITSTR=fitstr)
if ptr_valid(fitstr.ffit) EQ 1 then ptr_free, fitstr.ffit
endif else begin
In the procedure $XIDL_DIR/FIT/x_fit.pro, line 211 insert the following (in black; original code in gray):
if not keyword_set( NONRM ) then fitstr.nrm = nrm
if ptr_valid(fitstr.ffit) EQ 1 then ptr_free, fitstr.ffit
fitstr.ffit = ptr_new(ffit)
3. Add FIRE as an instrument option:
In the procedure $XIDL_DIR/SPEC/LONGSLIT/PRO/BIAS/long_rdnoiseimg.pro, add at or near line 100:
rn_img = transpose(rn_img)
ENDIF ELSE IF strcmp(instrument, 'FIRE') THEN BEGIN
BEGIN Wiki Markup
rn_img = fltarr(nx,ny)
rn_img\[*\] = 10.0
ENDIF ELSE IF strmatch(instrument, 'IMACS') OR $
N.B. If the line numbers change in future versions of xidl (and they may already have...), I've shown in gray the lines above and below where the new code should be inserted to work properly.unmigrated-wiki-markup
\[Note, this approximates the read noise for FIRE as 10e-, which is good enough for the purposes where this code is used. For a detailed calculation of the noise model we must find the noise as a function of Fowler or SUTR reads, which will be implemented soon\]
...