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