From 5fa3aa5c98bd501df6822292e126b9be4692d976 Mon Sep 17 00:00:00 2001 From: gspetro Date: Fri, 10 Feb 2023 09:47:31 -0500 Subject: [PATCH 1/3] Correct DEPTH param in CALHEL --- sorc/ncep_post.fd/CALHEL.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sorc/ncep_post.fd/CALHEL.f b/sorc/ncep_post.fd/CALHEL.f index a0fbceba2..eedc4feeb 100644 --- a/sorc/ncep_post.fd/CALHEL.f +++ b/sorc/ncep_post.fd/CALHEL.f @@ -13,7 +13,7 @@ !> 'non-classic' hodographs (such as Northwest-flow events) and do as well or !> better than the old method in more classic situations. !> -!> @param[in] DPTH Depth in meters over whcih helicity should be computed; allows one to distinguish 0-3 km and 0-1 km values. +!> @param[in] DEPTH Depth in meters over whcih helicity should be computed; allows one to distinguish 0-3 km and 0-1 km values. !> @param[out] UST Estimated U Component (m/s) Of Storm motion. !> @param[out] VST Estimated V Component (m/s) Of Storm motion. !> @param[out] HELI Storm-relative heliciry (m**2/s**2). From 60f43dc4fc25ed04a9b6aaeb76474fbc3755fcdf Mon Sep 17 00:00:00 2001 From: gspetro Date: Fri, 10 Feb 2023 11:03:22 -0500 Subject: [PATCH 2/3] add def for LPBL and ZPBL --- sorc/ncep_post.fd/CALGUST.f | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/sorc/ncep_post.fd/CALGUST.f b/sorc/ncep_post.fd/CALGUST.f index cef7b692e..86c5cc90e 100644 --- a/sorc/ncep_post.fd/CALGUST.f +++ b/sorc/ncep_post.fd/CALGUST.f @@ -3,8 +3,10 @@ ! !> This routine computes surface wind gust by mixing !> down momentum from the level at the height of the PBL. -!> -!> @param[out] GUST Speed of the maximum surface wind gust. +!> +!> @param[in] ZPBL Height of the planetary boundary layer. +!> @param[in] LPBL Model level that is closest to the planetary boundary layer height. +!> @param[inout] GUST Speed of the maximum surface wind gust. !> !> ### Program history log: !> Date | Programmer | Comments From cb709ef6f6715efe1617b32f3b241e693893cb62 Mon Sep 17 00:00:00 2001 From: gspetro Date: Fri, 10 Feb 2023 11:06:10 -0500 Subject: [PATCH 3/3] reorder variables in header --- sorc/ncep_post.fd/CALGUST.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sorc/ncep_post.fd/CALGUST.f b/sorc/ncep_post.fd/CALGUST.f index 86c5cc90e..47d1f8c86 100644 --- a/sorc/ncep_post.fd/CALGUST.f +++ b/sorc/ncep_post.fd/CALGUST.f @@ -4,8 +4,8 @@ !> This routine computes surface wind gust by mixing !> down momentum from the level at the height of the PBL. !> -!> @param[in] ZPBL Height of the planetary boundary layer. !> @param[in] LPBL Model level that is closest to the planetary boundary layer height. +!> @param[in] ZPBL Height of the planetary boundary layer. !> @param[inout] GUST Speed of the maximum surface wind gust. !> !> ### Program history log: