Skip to content

Commit

Permalink
Fix comments in cldj_interface_mod.F90 for clarity
Browse files Browse the repository at this point in the history
Signed-off-by: Melissa Sulprizio <mpayer@seas.harvard.edu>
  • Loading branch information
msulprizio committed Jan 9, 2024
1 parent a51cda0 commit 326c63c
Showing 1 changed file with 4 additions and 2 deletions.
6 changes: 4 additions & 2 deletions GeosCore/cldj_interface_mod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -483,9 +483,11 @@ SUBROUTINE Run_CloudJ( Input_Opt, State_Chm, State_Diag, &
CLDF(1:State_Grid%NZ) = State_Met%CLDF(I,J,1:State_Grid%NZ)
CLDF(State_Grid%NZ+1) = CLDF(State_Grid%NZ)

! Set humidity from input meteorology field
! Convert relative humidity [unitless] from percent to fraction
! Set relative humidity from input meteorology field and convert
! from percent to fraction
RRR(1:State_Grid%NZ) = State_Met%RH(I,J,1:State_Grid%NZ) / 100.d0

! Set top of atmosphere relative humidity to 10% of layer below
RRR(State_Grid%NZ+1) = RRR(State_Grid%NZ) * 1.d-1

! Loop over # layers in cloud-j (layers with clouds)
Expand Down

0 comments on commit 326c63c

Please sign in to comment.