Opened 12 years ago
Closed 12 years ago
#923 closed Bug (fixed)
missing lbc_lnk in the routine traadv_qck.F90
Reported by: | greffray | Owned by: | cbricaud |
---|---|---|---|
Priority: | low | Milestone: | |
Component: | OCE | Version: | v3.4 |
Severity: | Keywords: | ||
Cc: |
Description
After the loop 207-216, a lbclnk is required on zwx
CALL lbc_lnk( zwx(:,:,:), 'T', 1. ) ! Lateral boundary conditions
After the loop 330-339, a lbclnk is required on zwy
CALL lbc_lnk( zwy(:,:,:), 'T', 1. ) ! Lateral boundary conditions
Guillaume
Commit History (0)
(No commits)
Change History (1)
comment:1 Changed 12 years ago by cbricaud
- Resolution set to fixed
- Status changed from new to closed
Note: See
TracTickets for help on using
tickets.
resolved at rev 3300
===================================================================
--- traadv_qck.F90 (revision 3299)
+++ traadv_qck.F90 (working copy)
@@ -214,8 +214,12 @@
+ END DO
+ !
+ CALL lbc_lnk( zwx(:,:,:), 'T', 1. ) ! Lateral boundary conditions
+ !
+ ! Computation of the trend
+ DO jk = 1, jpkm1
@@ -225,7 +229,6 @@
@@ -337,8 +340,12 @@
+ END DO
+ !
+ CALL lbc_lnk( zwy(:,:,:), 'T', 1. ) ! Lateral boundary conditions
+ !
+ ! Computation of the trend
+ DO jk = 1, jpkm1
@@ -348,7 +355,6 @@