pro read_clim_5by5, filename, data

;EXAMPLE FOR READING THE OZONE AND TROPOPAUSE
;PRESSURE DATA TABLES AT 5DEG X 5DEG RESOLUTION:
;
;In IDL,
;
;  >  filename='tco_5by5_rms.txt'
;  >  read_clim_5by5, filename, data
;
data=fltarr(72,36,12) & stf=strarr(1) & b=fltarr(12)
openr,2,filename
for i=0,7 do readf,2,stf
for lat=0,35 do begin
  readf,2,stf
  for lon=0,71 do begin
    readf,2,stf,b,format='(a12,12f7.1)' & data(lon,lat,0:11)=b(0:11)
  endfor
endfor
close,2

return
end