- Timestamp:
- 2010-10-13T00:03:11+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/DEV_r2106_LOCEAN2010/NEMO/OPA_SRC/ASM/asmtrj.F90
r2128 r2239 224 224 #if defined key_ldfslp 225 225 IF(lwp) WRITE(numout,*) ' Compute the slopes of neutral surface...' 226 CALL bn2( t b,sb, rn2 )226 CALL bn2( tsb, rn2 ) 227 227 CALL ldf_slp( nit000, rhd, rn2 ) 228 228 #endif … … 280 280 281 281 END MODULE asmtrj 282 283
Note: See TracChangeset
for help on using the changeset viewer.