- Timestamp:
- 06/13/17 17:03:53 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SOURCES/calving_frange.f90
r113 r114 418 418 endwhere 419 419 420 where (front.le.0)421 calv(:,:)=0.422 endwhere423 420 calv_dtt(:,:) = calv_dtt(:,:) + calv(:,:) ! somme du calving sur dtt 424 421 ! calv_dtt est remis à 0 dans bilan_eau (tous les dtt)
Note: See TracChangeset
for help on using the changeset viewer.