The code.ill.fr has been recreated and upgraded with the latest version this weekend, If you encounter any problem please inform the Helpdesk.

Commit 4ed839b3 authored by Miguel Angel Gonzalez's avatar Miguel Angel Gonzalez
Browse files

Remove useless comments

parent c76843bb
......@@ -310,10 +310,6 @@ PRO rdid_d17, INST,numor,nvers,text,exper,scan,cnt,WOUT,vparm,param,par1,par2,pa
if idx ge 0 then PARAM[116] = par4[idx]
endelse
;Shuffle parameters to be consistent with order in ASCII file, but the inconsistency between ASCII and NeXuS should be solved in the files
;TS 2021-04-20: I do think they are in the correct order.
;PARAM[109:116] = [PARAM[109], PARAM[113], PARAM[111], PARAM[115], PARAM[110], PARAM[114], PARAM[112], PARAM[116]]
;PUT NeXus PARAMETERS in PAR1
par1 = fltarr(128)
......@@ -723,10 +719,10 @@ PRO rdid_d17, INST,numor,nvers,text,exper,scan,cnt,WOUT,vparm,param,par1,par2,pa
ysize=LONG(par1[100]-par1[99]+1)
;IF (tot ne ((xsize*ysize*tsize))) THEN PRINT,'read_d17: Error in data array dimensions'
;IF (iprint GT 0) THEN BEGIN
IF (iprint GT 0) THEN BEGIN
PRINT,'tsize= ',tsize,' detector size= ',xsize*ysize
PRINT,'xsize= ',xsize,' ysize= ',ysize,' tot1= ',xsize*ysize*tsize,' tot2= ',tot
;ENDIF
ENDIF
mon=par1[4]
......
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