Skip to content
Snippets Groups Projects
Commit e84f6b61 authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Philippe 26/03/2020: budgets: bugfix: wrong variable for HGCV budgets

parent eb2b9a81
No related branches found
No related tags found
No related merge requests found
......@@ -2412,7 +2412,7 @@ if ( tbudgets(NBUDGET_RG)%lenabled ) then
gcond = hcloud == 'ICE4' .and. lred
tzsource%cmnhname = 'HGCV'
tzsource%clongname = 'hail to graupel conversion'
call Budget_source_add( tbudgets(NBUDGET_RG), tzsource, gcond, nghcvrg )
call Budget_source_add( tbudgets(NBUDGET_RG), tzsource, gcond, nhgcvrg )
gcond = hcloud == 'ICE4' .and. lred
tzsource%cmnhname = 'DRYH'
......@@ -2551,7 +2551,7 @@ if ( tbudgets(NBUDGET_RH)%lenabled ) then
gcond = hcloud == 'ICE4' .and. lred
tzsource%cmnhname = 'HGCV'
tzsource%clongname = 'hail to graupel conversion'
call Budget_source_add( tbudgets(NBUDGET_RH), tzsource, gcond, nghcvrh )
call Budget_source_add( tbudgets(NBUDGET_RH), tzsource, gcond, nhgcvrh )
gcond = hcloud == 'ICE4' .and. lred
tzsource%cmnhname = 'DRYH'
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment