Changeset 237 for trunk/SOURCES/steps_time_loop.f90
- Timestamp:
- 01/09/19 17:09:26 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SOURCES/steps_time_loop.f90
r182 r237 68 68 where(.not.flot(:,:)) 69 69 S(:,:)=Bsoc(:,:)+H(:,:) 70 S(:,:)=max(S(:,:),sealevel )70 S(:,:)=max(S(:,:),sealevel_2d(:,:)) !afq -- WARNING: est-ce qu'on veut vraiment mettre S a la valeur locale du niveau marin? 71 71 B(:,:)=Bsoc(:,:) 72 72 end where
Note: See TracChangeset
for help on using the changeset viewer.