From 26f95141ce3ef4cbc6d78dc9c98eda8dca48466b Mon Sep 17 00:00:00 2001 From: Dom Heinzeller Date: Fri, 8 Mar 2024 12:40:51 -0700 Subject: [PATCH] In physics/Interstitials/UFS_SCM_NEPTUNE/maximum_hourly_diagnostics.F90, scale lightning threat from flashes per 5 minutes to flashes per minute to match units in metadata --- .../UFS_SCM_NEPTUNE/maximum_hourly_diagnostics.F90 | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/physics/Interstitials/UFS_SCM_NEPTUNE/maximum_hourly_diagnostics.F90 b/physics/Interstitials/UFS_SCM_NEPTUNE/maximum_hourly_diagnostics.F90 index cd1016053..f66aa77e9 100644 --- a/physics/Interstitials/UFS_SCM_NEPTUNE/maximum_hourly_diagnostics.F90 +++ b/physics/Interstitials/UFS_SCM_NEPTUNE/maximum_hourly_diagnostics.F90 @@ -80,6 +80,12 @@ subroutine maximum_hourly_diagnostics_run(im, levs, reset, lradar, imp_physics, !Lightning threat indices if (lightning_threat) then call lightning_threat_indices + ! Lightning threat indices are calculated as flashes per 5 minutes. + ! In order to scale that to flashes per minute (standard units), + ! we must divide the indices by a factor of 5 / multiply by 0.2 + ltg1_max = 0.2_kind_phys * ltg1_max + ltg2_max = 0.2_kind_phys * ltg2_max + ltg3_max = 0.2_kind_phys * ltg3_max endif !Calculate hourly max 1-km agl and -10C reflectivity