Skip to content

Commit

Permalink
Merge pull request #1098 from tlspero/I1084
Browse files Browse the repository at this point in the history
Updated MCIP Metadata for WRF Physics Beyond WRFv4.1
  • Loading branch information
fisidi authored Apr 30, 2024
2 parents 7319ff6 + f46c22e commit a93487c
Showing 1 changed file with 37 additions and 8 deletions.
45 changes: 37 additions & 8 deletions PREP/mcip/src/wrfemopts.f90
Original file line number Diff line number Diff line change
Expand Up @@ -42,6 +42,9 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
! 18 Jun 2019 Updated for WRFv4.1 options. Improved metadata to
! annotate if radiative feedbacks were included in the
! convective scheme. (T. Spero)
! 09 Apr 2024 Updated for options through WRFv4.5.2. Pulled options
! from WRF Users Guide for v4.5. Also included options
! planned for WRFv4.6 from their Git packages. (T. Spero)
!-------------------------------------------------------------------------------

USE metinfo
Expand Down Expand Up @@ -74,7 +77,7 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
IF ( ifcuradfdbk ) THEN ! feedback with radiation
txt_cupa = 'KF with radiative feedback'
ELSE
txt_cupa = 'Kain-Fritsch (new Eta)'
txt_cupa = 'Kain-Fritsch'
ENDIF
CASE ( 2 )
txt_cupa = 'Betts-Miller-Janjic'
Expand All @@ -89,7 +92,7 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
txt_cupa = 'Grell-Devenyi'
ENDIF
CASE ( 4 )
txt_cupa = 'Simplified Arakawa-Schubert'
txt_cupa = 'Old Simpl. Arakawa-Schubert'
CASE ( 5 )
IF ( ifcuradfdbk ) THEN
txt_cupa = 'Grell G3 w radiative feedback'
Expand All @@ -105,7 +108,7 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
CASE ( 11 )
txt_cupa = 'MSKF with radiative feedback'
CASE ( 14 )
txt_cupa = 'New Simpl. Arakawa-Schubert'
txt_cupa = 'KIAPS Simpl. Arakawa-Schubert'
CASE ( 16 )
txt_cupa = 'Newer Tiedtke'
CASE ( 84 )
Expand Down Expand Up @@ -136,11 +139,11 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
CASE ( 4 )
txt_microphys = 'WSM 5-Class'
CASE ( 5 )
txt_microphys = 'Ferrier (new Eta) Hi-Res'
txt_microphys = 'Ferrier (Eta) Hi-Res'
CASE ( 6 )
txt_microphys = 'WSM 6-Class'
CASE ( 7 )
txt_microphys = 'Goddard GCE'
txt_microphys = 'Goddard GCE (4 ice)'
CASE ( 8 )
txt_microphys = 'Thompson'
CASE ( 9 )
Expand All @@ -149,10 +152,14 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
txt_microphys = 'Morrison 2-moment'
CASE ( 11 )
txt_microphys = 'CAM 5.1'
CASE ( 12 )
txt_microphys = 'Millbrandt'
CASE ( 13 )
txt_microphys = 'Stony Brook-Lin'
CASE ( 14 )
txt_microphys = 'WDM 5-class'
CASE ( 15 )
txt_microphys = 'Ferrier (Eta) Hi-Res Advect'
CASE ( 16 )
txt_microphys = 'WDM 6-class'
CASE ( 17 )
Expand All @@ -175,6 +182,8 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
txt_microphys = 'HUJI spectral bin -- fast'
CASE ( 32 )
txt_microphys = 'HUJI spectral bin -- full'
CASE ( 38 )
txt_microphys = 'Thompson Hail/Graupel/Aero'
CASE ( 40 )
txt_microphys = 'Morrison+CESM aerosol'
CASE ( 50 )
Expand All @@ -183,10 +192,18 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
txt_microphys = 'P3 1-cat + dbl-mom cld water'
CASE ( 52 )
txt_microphys = 'P3 2 ice'
CASE ( 53 )
txt_microphys = 'P3 3 ice'
CASE ( 55 )
txt_microphys = 'Jensen ISHMAEL'
CASE ( 56 )
txt_microphys = 'NTU'
CASE ( 95 )
txt_microphys = 'Ferrier (old Eta) NAM'
CASE ( 96 )
txt_microphys = 'MAD WRF'
CASE ( 97 )
txt_microphys = 'GSFC GCE'
CASE ( 98 )
IF ( met_release(1:4) >= "V3.1" ) THEN
txt_microphys = 'old Thompson scheme'
Expand All @@ -195,6 +212,8 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
ENDIF
CASE ( 99 )
txt_microphys = 'NCEP 5-Class'
CASE ( 106 )
txt_microphys = 'WSM 6-Class R'
CASE DEFAULT
txt_microphys = '*** Unknown ***'
END SELECT
Expand All @@ -211,7 +230,7 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
CASE ( 3 )
txt_lwrad = 'CAM'
CASE ( 4 )
txt_lwrad = 'RRTMg'
txt_lwrad = 'RRTMG'
CASE ( 5 )
txt_lwrad = 'New Goddard'
CASE ( 7 )
Expand Down Expand Up @@ -242,7 +261,7 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
CASE ( 3 )
txt_swrad = 'CAM'
CASE ( 4 )
txt_swrad = 'RRTMg'
txt_swrad = 'RRTMG'
CASE ( 5 )
txt_swrad = 'New Goddard'
CASE ( 7 )
Expand Down Expand Up @@ -271,7 +290,7 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
CASE ( 2 )
txt_pbl = 'Mellor-Yamada-Janjic (Eta) TKE'
CASE ( 4 )
txt_pbl = 'QNSE'
txt_pbl = 'QNSE-EDMF'
CASE ( 5 )
txt_pbl = 'MYNN 2.5 level TKE'
CASE ( 6 )
Expand All @@ -288,6 +307,10 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
txt_pbl = 'Shin-Hong scale-aware scheme'
CASE ( 12 )
txt_pbl = 'Grenier-Bretherton-McCaa'
CASE ( 16 )
txt_pbl = 'EEPS'
CASE ( 17 )
txt_pbl = 'KEPS'
CASE ( 94 )
txt_pbl = 'Quasi-Normal Scale Elim'
CASE ( 99 )
Expand Down Expand Up @@ -321,6 +344,8 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
txt_sflay = 'Total Energy-Mass Flux (TEMF)'
CASE ( 11 )
txt_sflay = 'Revised MM5 (Jimenez)'
CASE ( 91 )
txt_sflay = 'MM5 Similarity'
CASE DEFAULT
txt_sflay = '*** Unknown ***'
END SELECT
Expand Down Expand Up @@ -386,6 +411,10 @@ SUBROUTINE wrfemopts (txt_cupa, txt_microphys, txt_lwrad, txt_swrad, &
txt_shcu = 'UW Bretherton and Park (CESM)'
CASE ( 3 )
txt_shcu = 'GRIMS (YSU)'
CASE ( 4 )
txt_shcu = 'NSAS Shallow Scheme'
CASE ( 5 )
txt_shcu = 'Deng Shallow Scheme'
CASE DEFAULT
txt_shcu = '*** Unknown ***'
END SELECT
Expand Down

0 comments on commit a93487c

Please sign in to comment.