---------- APROFILE.PRO
hbfile=ASSOC(hbunit,BYTARR(512))
; Open the single big file and associate it to variable.
files=ASSOC(imunit,BYTARR(66048))

---------- TMAGINT.PRO
files=ASSOC(unit,BYTARR(66048))
    files2=ASSOC(unit2,BYTARR(66048))

---------- ONEWQL.PRO
     0: save00=ASSOC(savunit(0),BYTARR(66048))
     1: save01=ASSOC(savunit(1),BYTARR(66048))
     2: save02=ASSOC(savunit(2),BYTARR(66048))
     3: save03=ASSOC(savunit(3),BYTARR(66048))
     4: save04=ASSOC(savunit(4),BYTARR(66048))
     5: save10=ASSOC(savunit(5),BYTARR(66048))
     6: save11=ASSOC(savunit(6),BYTARR(66048))
     7: save12=ASSOC(savunit(7),BYTARR(66048))
     8: save13=ASSOC(savunit(8),BYTARR(66048))
     9: save14=ASSOC(savunit(9),BYTARR(66048))
; If images are to be saved, open the associated files to hold them
        triangles0=ASSOC(t0unit,LONARR(3,115213))
        triangles1=ASSOC(t1unit,LONARR(3,116598))
;   	    bgs=ASSOC(bgunit,INTARR(256,256))
    ; save desired images in associated files
; Close associated files

---------- RDHBYTES.PRO
;	associated file variable).
    hbfile=ASSOC(hbunit,BYTARR(512))

---------- NEWQL.PRO
     0: save00=ASSOC(savunit(0),BYTARR(66048))
     1: save01=ASSOC(savunit(1),BYTARR(66048))
     2: save02=ASSOC(savunit(2),BYTARR(66048))
     3: save03=ASSOC(savunit(3),BYTARR(66048))
     4: save04=ASSOC(savunit(4),BYTARR(66048))
     5: save10=ASSOC(savunit(5),BYTARR(66048))
     6: save11=ASSOC(savunit(6),BYTARR(66048))
     7: save12=ASSOC(savunit(7),BYTARR(66048))
     8: save13=ASSOC(savunit(8),BYTARR(66048))
     9: save14=ASSOC(savunit(9),BYTARR(66048))
; If images are to be saved, open the associated files to hold them
        triangles0=ASSOC(t0unit,LONARR(3,115213))
        triangles1=ASSOC(t1unit,LONARR(3,116598))
            keep=ASSOC(keepunit,LONARR(256,256))
        FREE_LUN,keepunit	; close ASSOCiated file
            keep=ASSOC(keepunit,LONARR(256,256))
    ; save desired images in associated files
; Close associated files

---------- SELBGSIM.PRO
hbfile=ASSOC(hbunit,BYTARR(512))

---------- GET_BKGH.PRO
  images=ASSOC(iunit,BYTARR(262168L))

---------- POCAFLIC.PRO
; Open the single big file of processed images and associate it to
files=ASSOC(imunit,BYTARR(66048))
trans=ASSOC(trunit,BYTARR(383,383))
; Save the transformed image to the associated file

---------- SHOWFLIC.PRO
;       The file is opened as an associated file and the images
; Set up the associated file and the plot window.
im=ASSOC(unit,BYTARR(edge,edge))

---------- BUILDMTG.PRO
;       /BREAKUP: If set, stash the montage array into an ASSOCiated
    mtgsave=ASSOC(mtun,BYTARR(width,250))
image=ASSOC(data,BYTARR(edge,edge))
    FREE_LUN,mtun                       ; and close the ASSOC file
    mtgsave=ASSOC(mtun,BYTARR(width,250))
    mtgsave=ASSOC(mtun,BYTARR(width,250))

---------- TRAY2BGS.PRO
;        hbfile=ASSOC(hbunit,BYTARR(512))
                        rayfiles=ASSOC(runit,BYTARR(66048)) ; .ray
                        bkgfiles=ASSOC(bunit,BYTARR(262168)); .bkg

---------- FCAFIRST.PRO
; Modified 1994/2/7 by DPS to read images from associated files,
hbfile=ASSOC(hbunit,BYTARR(512))
; Open the single big file and associate it to variable.
files=ASSOC(imunit,BYTARR(66048))

---------- GETSAVHD.PRO
hbfile=ASSOC(hbunit,BYTARR(512))

---------- NEWQLBAK.PRO
     0: save00=ASSOC(savunit(0),BYTARR(66048))
     1: save01=ASSOC(savunit(1),BYTARR(66048))
     2: save02=ASSOC(savunit(2),BYTARR(66048))
     3: save03=ASSOC(savunit(3),BYTARR(66048))
     4: save04=ASSOC(savunit(4),BYTARR(66048))
     5: save10=ASSOC(savunit(5),BYTARR(66048))
     6: save11=ASSOC(savunit(6),BYTARR(66048))
     7: save12=ASSOC(savunit(7),BYTARR(66048))
     8: save13=ASSOC(savunit(8),BYTARR(66048))
     9: save14=ASSOC(savunit(9),BYTARR(66048))
; If images are to be saved, open the associated files to hold them
        triangles0=ASSOC(t0unit,LONARR(3,115213))
        triangles1=ASSOC(t1unit,LONARR(3,116598))
            keep=ASSOC(keepunit,LONARR(256,256))
        FREE_LUN,keepunit	; close ASSOCiated file
            keep=ASSOC(keepunit,LONARR(256,256))
    ; save desired images in associated files
; Close associated files

---------- QLOOKRAY.PRO
; Modified 1994/2/7 by DPS to read images from associated files,
; Open the single big file and associate it to variable.
files=ASSOC(imunit,BYTARR(66048))

---------- MAGINT.PRO
files=ASSOC(unit,BYTARR(66048))
    files2=ASSOC(unit2,BYTARR(66048))

---------- VIDEO.PRO
; Modified 1994/2/7 by DPS to read images from associated files,
; Open the single big file and associate it to variable.
files=ASSOC(imunit,BYTARR(66048))

---------- TMBKGRD.PRO
        hbfile=ASSOC(hbunit,BYTARR(512))
    files=ASSOC(unit,BYTARR(66048))

---------- SHOWRAY.PRO
; Modified 1994/2/7 by DPS to read images from associated files,
; Open the single big file and associate it to variable.
files=ASSOC(imunit,BYTARR(66048))

---------- VIDEO2.PRO
; Modified 1994/2/7 by DPS to read images from associated files,
; Open the single big file and associate it to variable.
files=ASSOC(imunit,BYTARR(66048))