;This Routine is going to try and remove hot pixels in my images 

data=mrdfits('../Phys100/4_4_05/M_51_g2_cal1.fit',0,My_header)

filtered=sigma_filter(data,3,n_sigma=2,/ALL,/MON)

mwrfits,filtered,'../Phys100/4_4_05/M_51_g2_cal1_filtered.fit',My_header


END