Changeset 69
- Timestamp:
- 08/02/12 20:41:23 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/trunk/src/advect.f90
r23 r69 144 144 !go to 123 145 145 DO l = 1,llm 146 DO j=jj_begin ,jj_end147 DO i=ii_begin ,ii_end146 DO j=jj_begin-1,jj_end+1 147 DO i=ii_begin-1,ii_end+1 148 148 n=(j-1)*iim+i 149 149
Note: See TracChangeset
for help on using the changeset viewer.