- Timestamp:
- 2010-09-10T12:32:58+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/DEV_r2006_merge_TRA_TRC/NEMO/TOP_SRC/PISCES/p4zint.F90
r1753 r2082 55 55 ! ------------------------------------------- 56 56 57 tgfunc (:,:,:) = EXP( 0.063913 * t n(:,:,:) )58 tgfunc2(:,:,:) = EXP( 0.07608 * t n(:,:,:) )57 tgfunc (:,:,:) = EXP( 0.063913 * tsn(:,:,:,jp_tem) ) 58 tgfunc2(:,:,:) = EXP( 0.07608 * tsn(:,:,:,jp_tem) ) 59 59 60 60 ! Computation of the silicon dependant half saturation
Note: See TracChangeset
for help on using the changeset viewer.