Skip to content

Commit

Permalink
Doxygen caldrg caldwcp calgust refinement (#464)
Browse files Browse the repository at this point in the history
* Further refinement to the tables and logs.

* Further refinement to the tables and logs. (#455)
  • Loading branch information
kayeekayee authored Mar 28, 2022
1 parent f22a590 commit cc2741b
Show file tree
Hide file tree
Showing 3 changed files with 29 additions and 28 deletions.
21 changes: 12 additions & 9 deletions sorc/ncep_post.fd/CALDRG.f
Original file line number Diff line number Diff line change
Expand Up @@ -2,17 +2,20 @@
!> @brief Subroutine that computes drag cofficient.
!
!> This rountine computes a surface layer drag coefficient using
!> equation (7.4.1A) in "An introduction to boundary layer
!> meteorology" by Stull (1988, Kluwer Academic Publishers).
!> equation (7.4.1A) in ["An introduction to boundary layer
!> meteorology" by Stull (1988, Kluwer Academic
!> Publishers)](https://link.springer.com/book/10.1007/978-94-009-3027-8).
!>
!> @param[out] DRAGCO surface layer drag coefficient
!> @param[out] DRAGCO surface layer drag coefficient.
!>
!> Program history
!> - 93-09-01 Russ Treadon
!> - 98-06-15 T Black - Conversion from 1-D to 2-D
!> - 00-01-04 Jim Tuccillo - MPI version
!> - 02-01-15 Mike Baldwin - WRF version
!> - 05-02-22 H Chuang - Add WRF NMM components
!> ### Program History Log
!> Date | Programmer | Comments
!> -----|------------|---------
!> 1993-09-01 | Russ Treadon | Initial
!> 1998-06-15 | T Black | Conversion from 1-D to 2-D
!> 2000-01-04 | Jim Tuccillo | MPI version
!> 2002-01-15 | Mike Baldwin | WRF version
!> 2005-02-22 | H Chuang | Add WRF NMM components
!>
!> @author Russ Treadon W/NP2 @date 1993-09-01
SUBROUTINE CALDRG(DRAGCO)
Expand Down
26 changes: 13 additions & 13 deletions sorc/ncep_post.fd/CALDWP.f
Original file line number Diff line number Diff line change
@@ -1,21 +1,21 @@
!> @file
!> @brief Subroutine related to dewpoint temperature.
!
!> Computes dewpoint from P, T, and Q
!> Computes dewpoint from P, T, and Q.
!>
!> @param[in] P1D Pressure (Pa)
!> @param[in] Q1D Specific humidity (kg/kg)
!> @param[in] T1D Temperature (K)
!> @param[out] TDWP Dewpoint temperature (K)
!> @param[in] P1D Pressure (Pa).
!> @param[in] Q1D Specific humidity (kg/kg).
!> @param[in] T1D Temperature (K).
!> @param[out] TDWP Dewpoint temperature (K).
!>
!> Program history
!> - 92-12-22 Russ Treadon
!> - 93-10-04 Russ Treadon - Added check to bound dewpoint
!> temperature to not exceed the
!> ambient temperature.
!> - 98-06-08 T BLACK - Conversion from 1-D to 2-D
!> - 00-01-04 Jim Tuccillo - MPI version
!> - 21-07-23 Wen Meng - Retrict computation from undefined points
!> ### Program history log:
!> Date | Programmer | Comments
!> -----|------------|---------
!> 1992-12-22 | Russ Treadon | Initial
!> 1993-10-04 | Russ Treadon | Added check to bound dewpoint temperature to not exceed the ambient temperature.
!> 1998-06-08 | T Black | Conversion from 1-D to 2-D
!> 2000-01-04 | Jim Tuccillo | MPI version
!> 2021-07-23 | Wen Meng | Retrict computation from undefined points
!>
!> @author Russ Treadon W/NP2 @date 1992-12-22
SUBROUTINE CALDWP(P1D,Q1D,TDWP,T1D)
Expand Down
10 changes: 4 additions & 6 deletions sorc/ncep_post.fd/CALGUST.f
Original file line number Diff line number Diff line change
Expand Up @@ -9,12 +9,10 @@
!> ### Program history log:
!> Date | Programmer | Comments
!> -----|------------|---------
!> 03-10-15 | Geoff Manokin | Initial
!> 05-03-09 | H Chuang | WRF Version
!> 05-07-07 | Binbin Zhou | Add RSM
!> 15-03-11 | S Moorthi | set sfcwind to spval if u10 and v10 are spvals
!> | for A grid and set gust to just wind
!> | (in GSM with nemsio, it appears u10 & v10 have spval)
!> 2003-10-15 | Geoff Manokin | Initial
!> 2005-03-09 | H Chuang | WRF Version
!> 2005-07-07 | Binbin Zhou | Add RSM
!> 2015-03-11 | S Moorthi | Set sfcwind to spval if u10 and v10 are spvals for A grid and set gust to just wind (in GSM with nemsio, it appears u10 & v10 have spval)
!>
!> @author Geoff Manikin W/NP2 @date 1997-03-04

Expand Down

0 comments on commit cc2741b

Please sign in to comment.