Correct a bug in the HAILCAST diagnostic code (units issue) (#320)

NOAA-GFDL · Mar 2, 2024 · f060e85 · f060e85
1 parent 6663459
commit f060e85
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/tools/module_diag_hailcast.F90 b/tools/module_diag_hailcast.F90
@@ -1092,8 +1092,7 @@ SUBROUTINE hailstone_driver ( ii,jj,TCA, h1d, ht, PA, rho1d,&
       IF (D.GT.0.254) D = 0.  !just consider missing for now if > 10 in
 
       !assign hail size in mm for output
-      !dhails(i) = D * 1000
-      dhails(i) = D
+      dhails(i) = D * 1000
 
     ENDDO  !end embryo size loop