Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
3 changes: 2 additions & 1 deletion physics/GFS_RRTMG_post.f90
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,8 @@
module GFS_RRTMG_post
contains

!>\defgroup GFS_RRTMG_post GFS RRTMG Scheme Post
!>\defgroup GFS_RRTMG_post GFS RRTMG Post
!>\ingroup RRTMG
!! @{
!> \section arg_table_GFS_RRTMG_post_init Argument Table
!!
Expand Down
4 changes: 3 additions & 1 deletion physics/GFS_RRTMG_pre.f90
Original file line number Diff line number Diff line change
@@ -1,12 +1,14 @@
!> \file GFS_RRTMG_pre.f90
!! This file contains

module GFS_RRTMG_pre

public GFS_RRTMG_pre_run

contains

!> \defgroup GFS_RRTMG_pre GFS RRTMG Scheme Pre
!> \defgroup GFS_RRTMG_pre GFS RRTMG Pre
!>\ingroup RRTMG
!! @{
!! \section arg_table_GFS_RRTMG_pre_init Argument Table
!!
Expand Down
32 changes: 23 additions & 9 deletions physics/GFS_calpreciptype.f90
Original file line number Diff line number Diff line change
@@ -1,15 +1,24 @@
!> \file GFS_calpreciptype.F90
!! This file contains the subroutine that calculates dominant precipitation type (calpreciptype)
!! and its post. It is adopted from post but was made into a column to used by GFS model.

!> \file GFS_calpreciptype.f90
!! This file contains the subroutine that calculates dominant precipitation type (calpreciptype),
!! which provides precipitation forcing for LSM.

!>\defgroup CALPRECIPTYPE GFS Dominant Precipitation Type
!!\brief This scheme contains the subroutine that calculates dominant
!! precipitation type and its post, which provides precipitation forcing
!! to LSM
!!
!!\section intraphysics Intraphysics Communication
!
module GFS_calpreciptype
contains

!> \section arg_table_GFS_calpreciptype_init Argument Table
!!
! \section arg_table_GFS_calpreciptype_init Argument Table
!
subroutine GFS_calpreciptype_init
end subroutine GFS_calpreciptype_init

!>\defgroup gfs_calpreciptype GFS calpreciptype Main
!!\ingroup CALPRECIPTYPE
!!\brief This subroutine calculates dominant precipitation type, which provides precipitation forcing for LSM.
!> \section arg_table_GFS_calpreciptype_run Argument Table
!! | local var name | longname | description | units | rank | type | kind | intent | optional |
!! |----------------|------------------------------------------------------------------------|------------------------------------------------------------|---------|------|---------|-----------|--------|----------|
Expand Down Expand Up @@ -41,6 +50,10 @@ end subroutine GFS_calpreciptype_init
!! | srflag | flag_for_precipitation_type | snow(1)/rain(0) flag for precipitation | flag | 1 | real | kind_phys | out | F |
!! | tprcp | nonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep | nonnegative precipitation amount in one dynamics time step | m | 1 | real | kind_phys | out | F |
!!
!! \section general_calpreciptype General Algorithm
!!
!! \section detailed_calpreciptype Detailed Algorithm
!! @{
subroutine GFS_calpreciptype_run(kdt,nrcm,im,ix,lm,lp1,randomno, &
cal_pre, &
gt0,gq0,prsl,prsi, rainc,frain,rain1, &
Expand Down Expand Up @@ -308,6 +321,7 @@ subroutine GFS_calpreciptype_run(kdt,nrcm,im,ix,lm,lp1,randomno, &

return
end subroutine GFS_calpreciptype_run
!! @}
!
!&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
!
Expand Down Expand Up @@ -1513,8 +1527,8 @@ subroutine calwxt_dominant(nalg,rain,freezr,sleet,snow, &
return
end subroutine calwxt_dominant

!> \section arg_table_GFS_calpreciptype_finalize Argument table
!!
! \section arg_table_GFS_calpreciptype_finalize Argument table
!
subroutine GFS_calpreciptype_finalize
end subroutine GFS_calpreciptype_finalize

Expand Down
1 change: 1 addition & 0 deletions physics/GFS_rad_time_vary.f90
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,7 @@ module GFS_rad_time_vary
contains

!>\defgroup GFS_rad_time_vary GFS RRTMG Update
!!\ingroup RRTMG
!! @{
!! \section arg_table_GFS_rad_time_vary_init Argument Table
!!
Expand Down
3 changes: 2 additions & 1 deletion physics/GFS_radlw_post.f90
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,8 @@
module GFS_radlw_post
contains

!>\defgroup GFS_radlw_post GFS RRTMG/RADLW Scheme Post
!>\defgroup GFS_radlw_post GFS RADLW Post
!! \ingroup RRTMG
!! @{
!> \section arg_table_GFS_radlw_post_init Argument Table
!!
Expand Down
3 changes: 2 additions & 1 deletion physics/GFS_radlw_pre.f90
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,8 @@
module GFS_radlw_pre
contains

!>\defgroup GFS_radlw_pre GFS RADLW Scheme Pre
!>\defgroup GFS_radlw_pre GFS RADLW Pre
!!\ingroup RRTMG
!! @{
!> \section arg_table_GFS_radlw_pre_init Argument Table
!!
Expand Down
3 changes: 2 additions & 1 deletion physics/GFS_radsw_post.f90
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,8 @@
module GFS_radsw_post
contains

!>\defgroup GFS_radsw_post GFS RRTMG/RADSW Scheme Post
!>\defgroup GFS_radsw_post GFS RADSW Post
!!\ingroup RRTMG
!! @{
!> \section arg_table_GFS_radsw_post_init Argument Table
!!
Expand Down
3 changes: 2 additions & 1 deletion physics/GFS_radsw_pre.f90
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,8 @@
module GFS_radsw_pre
contains

!>\defgroup GFS_radsw_pre GFS RADSW Scheme Pre
!>\defgroup GFS_radsw_pre GFS RADSW Pre
!!\ingroup RRTMG
!! @{
!> \section arg_table_GFS_radsw_pre_init Argument Table
!!
Expand Down
10 changes: 10 additions & 0 deletions physics/GFS_radupdate.f90
Original file line number Diff line number Diff line change
@@ -1,6 +1,15 @@
!>\file GFS_radupdate.f90
!! This file calls many update subroutines to check and update radiation required but
!! time varying data sets and module variables.
module GFS_radupdate
contains

!>\defgroup GFS_radupdate_run RRTMG Update
!!\ingroup RRTMG
!>\brief This subroutine calls many update subroutines to check and update radiation
!! required but time varying data sets and module variables.
!>\section gen_radupdate General Algorithm
!> @{
subroutine GFS_radupdate_run ( idate,jdate,deltsw,deltim,lsswr, me, &
& slag,sdec,cdec,solcon, ictmflg, isolar)

Expand Down Expand Up @@ -170,5 +179,6 @@ subroutine GFS_radupdate_run ( idate,jdate,deltsw,deltim,lsswr, me, &
!...................................
end subroutine GFS_radupdate_run
!-----------------------------------
!> @}

end module GFS_radupdate
2 changes: 0 additions & 2 deletions physics/GFS_surface_loop_control.f
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,6 @@
!> \defgroup GFS_surface_loop_control GFS_surface_loop_control scheme
!! @{
!! \brief Brief description of the parameterization
!! \section diagram Calling Hierarchy Diagram
!! \section intraphysics Intraphysics Communication

module GFS_surface_loop_control_part1
Expand Down Expand Up @@ -57,7 +56,6 @@ end module GFS_surface_loop_control_part1
!> \defgroup GFS_surface_loop_control GFS_surface_loop_control scheme
!! @{
!! \brief Brief description of the parameterization
!! \section diagram Calling Hierarchy Diagram
!! \section intraphysics Intraphysics Communication

module GFS_surface_loop_control_part2
Expand Down
Loading