pro summer2

load, '/davis/s3/wlef/jws/Summer1999.txt', srop1
rows=row(srop1)
print, rows
days=rows/24
CO2=fltarr(24)
for A=0,23 do begin
index=indgen(rows/24)*24+A
CO2(A)=meanbadval(srop1(14,index))
endfor
X=indgen(24)-12
print, CO2
printps1, '/davis/s3/wlef/jws/Summer1999.ps','landscape'
plot, X,CO2, yrange=[360,370]. xstyle=1, xrange=[-11,12], TITLE='CO2 Concentration According 
to Hour of Frontal Passage', xtitle-'Hours', ytitle='CO2 Concentration (ppm)'
printps2
return
end