Skip to content
Snippets Groups Projects
Commit 09e79aa1 authored by Rolf Heilemann Myhre's avatar Rolf Heilemann Myhre
Browse files

minor cleanup

parent 2c287595
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/common/micro/mode_rain_ice_old_sedimentation_split.F90
+ 1
− 1
View file @ 09e79aa1
......@@ -118,7 +118,7 @@ MODULE MODE_RAIN_ICE_OLD_SEDIMENTATION_SPLIT
REAL, DIMENSION(KSIZE) :: ZRAY1D ! Mean radius
REAL, DIMENSION(KSIZE) :: ZWLBDA ! Libre parcours moyen
REAL, DIMENSION(D%NIT,D%NKT) :: ZW ! work array
REAL, DIMENSION(D%NIT, D%NKT) :: ZW ! work array
REAL, DIMENSION(KSIZE) :: ZZT ! Temperature
REAL, DIMENSION(KSIZE) :: ZPRES ! Pressure
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

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