Skip to content

Commit

Permalink
Removing uncorrect comment missed in previous commit.
Browse files Browse the repository at this point in the history
  • Loading branch information
mwaxmonsky committed May 17, 2024
1 parent 4a4929a commit 188d52e
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion tj2016/tj2016_precip.F90
Original file line number Diff line number Diff line change
Expand Up @@ -31,7 +31,7 @@ subroutine tj2016_precip_run(ncol, pver, gravit, rairv,
real(kind_phys), intent(in) :: cpairv(:,:) ! cp: specific heat of dry air (J/K/kg)
real(kind_phys), intent(in) :: latvap ! L: latent heat of vaporization (J/kg)
real(kind_phys), intent(in) :: rh2o ! Rv: water vapor gas constant (J/K/kg)
real(kind_phys), intent(in) :: epsilo ! Rd/Rv: ratio of h2o to dry air molecular weights
real(kind_phys), intent(in) :: epsilo ! ratio of h2o to dry air molecular weights
real(kind_phys), intent(in) :: rhoh2o ! density of liquid water (kg/m3)
real(kind_phys), intent(in) :: ps0 ! Base state surface pressure (Pa)
real(kind_phys), intent(in) :: etamid(:) ! hybrid coordinate - midpoints
Expand Down

0 comments on commit 188d52e

Please sign in to comment.