Opened 6 years ago

Closed 6 years ago

Last modified 3 years ago

#1412 closed Bug (fixed)

uoce and voce output not scaled by layer thickness due to IF condition in diawri.F90

Reported by: atb299 Owned by: flavoni
Priority: low Milestone: 2015 release-3.6
Component: OCE Version: release-3.6
Severity: Keywords: 2015
Cc:

Description

The current implementation in diawri.F90 includes an erroneous IF condition on line 167:-

IF( lk_vvl .AND. (.NOT. ln_dynadv_vec) ) THEN

CALL iom_put( "uoce" , un(:,:,:) * fse3u_n(:,:,:) )    ! i-transport
CALL iom_put( "voce" , vn(:,:,:) * fse3v_n(:,:,:) )    ! j-transport

It should be replaced with:-

IF( lk_vvl ) THEN

CALL iom_put( "uoce" , un(:,:,:) * fse3u_n(:,:,:) ) ! i-transport
CALL iom_put( "voce" , vn(:,:,:) * fse3v_n(:,:,:) ) ! j-transport

Commit History (0)

(No commits)

Change History (5)

comment:1 Changed 6 years ago by clevy

  • Milestone set to 2015 nemo_v3_6_STABLE
  • Owner changed from NEMO team to flavoni

comment:2 Changed 6 years ago by flavoni

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

comment:3 Changed 4 years ago by nicolasmartin

  • Keywords 2015 nemo_v3_6* added

comment:4 Changed 3 years ago by nemo

  • Keywords release-3.6* added; nemo_v3_6* removed

comment:5 Changed 3 years ago by nemo

  • Keywords release-3.6* removed
Note: See TracTickets for help on using tickets.