Skip to content
Snippets Groups Projects
Commit 17d032a3 authored by Clement Rousset's avatar Clement Rousset
Browse files

Merge branch '92-bug-in-the-outputs-from-dia_ar5_hst' into 'branch_4.2'

Resolve "bug in the outputs from dia_ar5_hst"

See merge request nemo/nemo!140
parents 578df0dc d4d34f1c
No related branches found
No related tags found
No related merge requests found
...@@ -319,7 +319,7 @@ CONTAINS ...@@ -319,7 +319,7 @@ CONTAINS
REAL(wp), DIMENSION(A2D(nn_hls)) :: z2d REAL(wp), DIMENSION(A2D(nn_hls)) :: z2d
!!---------------------------------------------------------------------- !!----------------------------------------------------------------------
z2d(:,:) = puflx(:,:,1) z2d(:,:) = 0._wp
DO_3D( 0, 0, 0, 0, 1, jpkm1 ) DO_3D( 0, 0, 0, 0, 1, jpkm1 )
z2d(ji,jj) = z2d(ji,jj) + puflx(ji,jj,jk) z2d(ji,jj) = z2d(ji,jj) + puflx(ji,jj,jk)
END_3D END_3D
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment