- 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/OPA_SRC/TRD/trdicp.F90
r2026 r2082 370 370 zkepe(:,:,:) = 0.e0 371 371 372 CALL eos( t n,sn, rhd, rhop ) ! now potential and in situ densities372 CALL eos( tsn, rhd, rhop ) ! now potential and in situ densities 373 373 374 374 ! Density flux at w-point
Note: See TracChangeset
for help on using the changeset viewer.