Remove useless comments

lamp_mac/D17/rdid_d17.pro

@@ -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]