Parent Directory
|
Revision Log
|
Revision Graph
|
Patch
revision 1.10 by molod, Mon Jul 26 20:11:33 2004 UTC | revision 1.11 by molod, Wed Jul 28 01:25:07 2004 UTC | |
---|---|---|
# | Line 171 C Note: 2 quantities in Ozone Dataset | Line 171 C Note: 2 quantities in Ozone Dataset |
171 | nrec = lev+(time-1)*nlev*2 | nrec = lev+(time-1)*nlev*2 |
172 | read(ku,rec=nrec) o3 | read(ku,rec=nrec) o3 |
173 | do lat=1,nlat | do lat=1,nlat |
174 | oz(lat,nlev-lev+1,time) = o3(lat) | C oz(lat,nlev-lev+1,time) = o3(lat) |
175 | oz(lat,nlev-lev+1,time) = 1.e-9 | |
176 | enddo | enddo |
177 | enddo | enddo |
178 | enddo | enddo |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |