Changeset 2363b24 in flexpart.git for src/advance.f90
- Timestamp:
- Jan 27, 2017, 9:46:35 AM (7 years ago)
- Branches:
- master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie
- Children:
- 278f4ed
- Parents:
- cea125d
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/advance.f90
rcea125d r2363b24 250 250 do k=1,2 251 251 mind=memind(k) ! eso: compatibility with 3-field version 252 if (interpolhmix) 252 if (interpolhmix) then 253 253 h1(k)=p1*hmix(ix ,jy ,1,mind) & 254 254 + p2*hmix(ixp,jy ,1,mind) &
Note: See TracChangeset
for help on using the changeset viewer.