Changeset 6771
- Timestamp:
- 2016-07-01T16:53:13+02:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/TRA/traadv_fct.F90
r6691 r6771 487 487 zwz_sav(:,:,:) = zwz(:,:,:) 488 488 ztrs (:,:,:,1) = ptb(:,:,:,jn) 489 ztrs (:,:,1,2) = ptb(:,:,1,jn) 490 ztrs (:,:,1,3) = ptb(:,:,1,jn) 489 491 zwzts (:,:,:) = 0._wp 490 492 !
Note: See TracChangeset
for help on using the changeset viewer.