Commit 991450cf authored by Gonzalez, Miguel's avatar Gonzalez, Miguel
Browse files

Issue 55: Correct bug in tee for in16b

parent 5a54212e
......@@ -131,10 +131,12 @@ function tee, in_wk, DEAD=dead
endelse
endelse
x_tit[one]='Energy Transfer (ueV)'
;Energy corresponds to neutron energy transfer,
;reverse array to be consistent with usual ILL
;choice of plotting vs SAMPLE energy transfer
in_wk = reverse(in_wk)
w_out = reverse(in_wk)
e_out = reverse(e_out)
; Copies work-space stuff from simple arrays back to main LAMP arrays
n_wk = string(out_wk)
......@@ -148,7 +150,7 @@ function tee, in_wk, DEAD=dead
jjj = execute('e' +n_wk+'=e_out' )
;
;done @mac.out
return, in_wk
return, w_out
endif
coef = fltarr(nch)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment