Skip to content
Snippets Groups Projects
Commit 18d22b5c authored by VIE Benoit's avatar VIE Benoit Committed by RODIER Quentin
Browse files

correct description for ACC process in ini_budget

parent d2b0adbc
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 2 additions and 2 deletions
src/MNH/ini_budget.f90
+ 2
− 2
View file @ 18d22b5c
...@@ -2731,7 +2731,7 @@ if ( tbudgets(NBUDGET_RG)%lenabled ) then ...@@ -2731,7 +2731,7 @@ if ( tbudgets(NBUDGET_RG)%lenabled ) then
call Budget_source_add( tbudgets(NBUDGET_RG), tzsource ) call Budget_source_add( tbudgets(NBUDGET_RG), tzsource )
tzsource%cmnhname = 'ACC' tzsource%cmnhname = 'ACC'
tzsource%clongname = 'accretion of rain on graupel' tzsource%clongname = 'accretion of rain on snow'
tzsource%lavailable = ( hcloud == 'LIMA' .and. ( lptsplit .or. ( nmom_i.ge.1 .and. nmom_c.ge.1 & tzsource%lavailable = ( hcloud == 'LIMA' .and. ( lptsplit .or. ( nmom_i.ge.1 .and. nmom_c.ge.1 &
.and. nmom_s.ge.1 .and. nmom_r.ge.1) ) ) & .and. nmom_s.ge.1 .and. nmom_r.ge.1) ) ) &
.or. hcloud(1:3) == 'ICE' .or. hcloud(1:3) == 'ICE'
...@@ -4275,7 +4275,7 @@ SV_BUDGETS: do jsv = 1, ksv ...@@ -4275,7 +4275,7 @@ SV_BUDGETS: do jsv = 1, ksv
call Budget_source_add( tbudgets(ibudget), tzsource ) call Budget_source_add( tbudgets(ibudget), tzsource )
tzsource%cmnhname = 'ACC' tzsource%cmnhname = 'ACC'
tzsource%clongname = 'accretion of rain on graupel' tzsource%clongname = 'accretion of rain on snow'
tzsource%lavailable = .true. tzsource%lavailable = .true.
call Budget_source_add( tbudgets(ibudget), tzsource ) call Budget_source_add( tbudgets(ibudget), tzsource )
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme