diff --git a/src/MNH/endstep.f90 b/src/MNH/endstep.f90 index a272d44733c0c9d0ed35dd117e91f9183be0f2f2..d22aa91484d0bbec7dc3971095226906c04fcf55 100644 --- a/src/MNH/endstep.f90 +++ b/src/MNH/endstep.f90 @@ -557,7 +557,7 @@ IF (LBU_ENABLE) THEN if ( lbudget_rh ) call Budget_store_end( tbudgets(NBUDGET_RH ), 'ENDF', prs (:, :, :, 7) * prhodj(:, :, :) / ptstep ) if ( lbudget_sv ) then do jsv = 1, ksv - call Budget_store_end( tbudgets(jsv + NBUDGET_SV1 - 1), 'ENDF', psvs(:, :, :, jsv) * zrhodjontime(:, :, :) ) + call Budget_store_end( tbudgets(jsv + NBUDGET_SV1 - 1), 'ENDF', psvs(:, :, :, jsv) * prhodj(:, :, :) / ptstep ) end do end if