Changeset 919
- Timestamp:
- 2008-05-09T12:13:10+02:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/LIM_SRC_3/limrst.F90
r888 r919 445 445 END DO 446 446 447 DO jl = 1, jpl 448 CALL lbc_lnk( smv_i(:,:,jl) , 'T' , 1. ) 449 CALL lbc_lnk( v_i (:,:,jl) , 'T' , 1. ) 450 CALL lbc_lnk( a_i (:,:,jl) , 'T' , 1. ) 451 END DO 452 447 453 ! we first with bulk ice salinity 448 454 DO jl = 1, jpl
Note: See TracChangeset
for help on using the changeset viewer.