Opened 4 years ago

Closed 4 years ago

#1797 closed Bug (fixed)

bug zdfric

Reported by: clem Owned by: nemo
Priority: low Milestone:
Component: OCE Version: trunk
Severity: Keywords:
Cc:

Description

there is still one "fsdept" variable left in zdfric.F90 in the trunk (at r7161). It should be replaced by gdept_n

Commit History (0)

(No commits)

Change History (2)

comment:1 Changed 4 years ago by nicolasmartin

Even better by viewing it ;-)

Linetrunk/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfric.F90
202      !  Force the vertical mixing coef within the Ekman depth
203      ! -------------------------------------------------------
204      DO jk = 2, jpkm1
205         DO jj = 2, jpjm1
206            DO ji = fs_2, fs_jpim1
207               IF( fsdept(ji,jj,jk) < ekm_dep(ji,jj) ) THEN
208                  avmv(ji,jj,jk) = MAX( avmv(ji,jj,jk), rn_wvmix )
209                  avmu(ji,jj,jk) = MAX( avmu(ji,jj,jk), rn_wvmix )
210                  avt( ji,jj,jk) = MAX(  avt(ji,jj,jk), rn_wtmix )
211               ENDIF
212            END DO
213         END DO
214      END DO


comment:2 Changed 4 years ago by clem

  • Resolution set to fixed
  • Status changed from new to closed

fixed in the actual trunk

Note: See TracTickets for help on using tickets.