; 
!path=!path+':idl_fits'
; read in two datasets
; and display their dimensionss:

data1=readfits('data1.fits',/silent)
data2=readfits('data2.fits',/silent)
help,data1
help,data2

; read in samples of raw MDI Dopplergram, MDI contiuum intensity,
;    and MDI magnetogram and display their dimensions

mdi_doppler=readfits('fd_V_01h.81041.0034.fits',/silent)
mdi_mag=readfits('fd_M_96m_01d.3376.0011.fits',/silent)
mdi_int=readfits('fd_Ic_6h_01d.3376.0003.fits',/silent)
help,mdi_doppler,mdi_int,mdi_mag

; display MDI Dopplergram, Magnetogram, and intensity image 
window,0,retain=2
tvim,mdi_doppler,/scale,stitle='m/s',range=[-2000,2000],title='fd_V_01h.81041.0034.fits'
window,1,retain=2
tvim,mdi_mag,/scale,stitle='Gauss',range=[-1000,1000],title='fd_M_96m_01d.3376.0011.fits'
window,2,retain=2
tvim,mdi_int,/scale,range=[0,15000],title='fd_Ic_6h_01d.3376.0003.fits'

