PRO grab_info, unit, name, x_dim, y_dim, xc, yc, radius, maxzd, $ rot, alt, glat, glong, hl ; INPUT: ; unit ; OUTPUTS: ; name Name of file containing all-sky image ; x_dim X dimension of image ; y_dim Y dimension of image ; xc, yc PIXEL coordinates for the center field of view for ; the image ; radius PIXEL radius to the edge of the field of view ; maxzd Zenith distance associated with edge of the field ; of view ; rot Rotation of the CCD image plane y-axis away from ; geographic north ; alt Altitude of all-sky camera (km) ; glat Geodetic latitude of camera ; glong Geographic longitude of camera (deg East) ; hl Centroid height of the emission layer to be mapped ; READ THE FILENAME name = '' str = '' offset = 35 READF,unit,str ; Skip lines beginning with ";" WHILE(STRMID(str,0,1) EQ ";") DO READF,unit,str name = STRTRIM(STRMID(str,offset,STRLEN(str)-offset),2) x = read_real(unit,offset) x_dim = LONG(x) x = read_real(unit,offset) y_dim = LONG(x) x = read_real(unit,offset) xc = LONG(x) x = read_real(unit,offset) yc = LONG(x) x = read_real(unit,offset) radius = LONG(x) maxzd = read_real(unit,offset) rot = read_real(unit,offset) alt = read_real(unit,offset) glat = read_real(unit,offset) glong = read_real(unit,offset) hl = read_real(unit,offset) end