Skip to content

Commit

Permalink
Remove commented-out lines in ccpp/data/GFS_typedefs.F90
Browse files Browse the repository at this point in the history
  • Loading branch information
@climbfuji
climbfuji committed Oct 28, 2021
1 parent d5d0b36 commit 2815425
Showing 1 changed file with 0 additions and 16 deletions.
16 changes: 0 additions & 16 deletions ccpp/data/GFS_typedefs.F90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -1804,7 +1804,6 @@ module GFS_typedefs
real (kind=kind_phys), pointer :: alb1d(:) => null() !<
real (kind=kind_phys), pointer :: alpha(:,:) => null() !<
real (kind=kind_phys), pointer :: bexp1d(:) => null() !<
!real (kind=kind_phys), pointer :: canopy_save(:) => null() !<
real (kind=kind_phys), pointer :: cd(:) => null() !<
real (kind=kind_phys), pointer :: cd_ice(:) => null() !<
real (kind=kind_phys), pointer :: cd_land(:) => null() !<
Expand All @@ -1817,7 +1816,6 @@ module GFS_typedefs
real (kind=kind_phys), pointer :: chh_ice(:) => null() !<
real (kind=kind_phys), pointer :: chh_land(:) => null() !<
real (kind=kind_phys), pointer :: chh_water(:) => null() !<
!real (kind=kind_phys), pointer :: chk_land(:) => null() !<
real (kind=kind_phys), pointer :: clcn(:,:) => null() !<
real (kind=kind_phys), pointer :: cldf(:) => null() !<
real (kind=kind_phys), pointer :: cldsa(:,:) => null() !<
Expand All @@ -1827,7 +1825,6 @@ module GFS_typedefs
real (kind=kind_phys), pointer :: clouds(:,:,:) => null() !<
real (kind=kind_phys), pointer :: clw(:,:,:) => null() !<
real (kind=kind_phys), pointer :: clx(:,:) => null() !<
!real (kind=kind_phys), pointer :: cmc(:) => null() !<
real (kind=kind_phys), pointer :: cmm_ice(:) => null() !<
real (kind=kind_phys), pointer :: cmm_land(:) => null() !<
real (kind=kind_phys), pointer :: cmm_water(:) => null() !<
Expand All @@ -1848,10 +1845,8 @@ module GFS_typedefs
real (kind=kind_phys), pointer :: delr(:,:) => null() !<
real (kind=kind_phys), pointer :: dlength(:) => null() !<
real (kind=kind_phys), pointer :: dqdt(:,:,:) => null() !<
!real (kind=kind_phys), pointer :: dqsdt2(:) => null() !<
real (kind=kind_phys), pointer :: dqsfc1(:) => null() !<
real (kind=kind_phys), pointer :: drain(:) => null() !<
!real (kind=kind_phys), pointer :: drain_in_m_sm1(:) => null() !<
real (kind=kind_phys), pointer :: dtdt(:,:) => null() !<
real (kind=kind_phys), pointer :: dtsfc1(:) => null() !<
real (kind=kind_phys), pointer :: dtzm(:) => null() !<
Expand Down Expand Up @@ -1886,8 +1881,6 @@ module GFS_typedefs
logical, pointer :: flag_cice(:) => null() !<
logical, pointer :: flag_guess(:) => null() !<
logical, pointer :: flag_iter(:) => null() !<
!logical, pointer :: flag_lsm(:) => null() !<
!logical, pointer :: flag_lsm_glacier(:)=> null() !<
real (kind=kind_phys), pointer :: ffmm_ice(:) => null() !<
real (kind=kind_phys), pointer :: ffmm_land(:) => null() !<
real (kind=kind_phys), pointer :: ffmm_water(:) => null() !<
Expand Down Expand Up @@ -1993,8 +1986,6 @@ module GFS_typedefs
real (kind=kind_phys), pointer :: qss_ice(:) => null() !<
real (kind=kind_phys), pointer :: qss_land(:) => null() !<
real (kind=kind_phys), pointer :: qss_water(:) => null() !<
!real (kind=kind_phys), pointer :: qs1(:) => null() !<
!real (kind=kind_phys), pointer :: qv1(:) => null() !<
logical :: radar_reset !<
real (kind=kind_phys) :: raddt !<
real (kind=kind_phys), pointer :: rainmp(:) => null() !<
Expand All @@ -2009,9 +2000,7 @@ module GFS_typedefs
logical :: max_hourly_reset !<
logical :: ext_diag_thompson_reset !<
real (kind=kind_phys), pointer :: rhc(:,:) => null() !<
!real (kind=kind_phys), pointer :: rho1(:) => null() !<
real (kind=kind_phys), pointer :: runoff(:) => null() !<
!real (kind=kind_phys), pointer :: runoff_in_m_sm1(:) => null() !<
real (kind=kind_phys), pointer :: save_q(:,:,:) => null() !<
real (kind=kind_phys), pointer :: save_t(:,:) => null() !<
real (kind=kind_phys), pointer :: save_tcp(:,:) => null() !<
Expand All @@ -2028,9 +2017,6 @@ module GFS_typedefs
logical :: skip_macro !<
real (kind=kind_phys), pointer :: snowc(:) => null() !<
real (kind=kind_phys), pointer :: snohf(:) => null() !<
!real (kind=kind_phys), pointer :: snohf_snow(:) => null() !<
!real (kind=kind_phys), pointer :: snohf_frzgra(:) => null() !<
!real (kind=kind_phys), pointer :: snohf_snowmelt(:) => null() !<
real (kind=kind_phys), pointer :: snowmp(:) => null() !<
real (kind=kind_phys), pointer :: snowmt(:) => null() !<
real (kind=kind_phys), pointer :: stress(:) => null() !<
Expand All @@ -2039,13 +2025,11 @@ module GFS_typedefs
real (kind=kind_phys), pointer :: stress_water(:) => null() !<
real (kind=kind_phys), pointer :: t2mmp(:) => null() !<
real (kind=kind_phys), pointer :: theta(:) => null() !<
!real (kind=kind_phys), pointer :: th1(:) => null() !<
real (kind=kind_phys), pointer :: tlvl(:,:) => null() !<
real (kind=kind_phys), pointer :: tlyr(:,:) => null() !<
real (kind=kind_phys), pointer :: tprcp_ice(:) => null() !<
real (kind=kind_phys), pointer :: tprcp_land(:) => null() !<
real (kind=kind_phys), pointer :: tprcp_water(:) => null() !<
!real (kind=kind_phys), pointer :: tprcp_rate_land(:) => null() !<
integer :: tracers_start_index !<
integer :: tracers_total !<
integer :: tracers_water !<
Expand Down

0 comments on commit 2815425

Please sign in to comment.