;.run mrdfits

;READ, "Enter Name of File:",File_name,format=string
READ, "Enter Row:",row,format=long
READ, "Enter Read:",Read,format=long

data=mrdfits('./dark_160K_33_min_1_8.0_40.fits',0,My_header)

print,My_header

b=data(row,*,read)

plot,b

END