Skip to content

Commit 573cf9a

Browse files
committed
Address review comments
1 parent db335b5 commit 573cf9a

File tree

2 files changed

+2
-3
lines changed

2 files changed

+2
-3
lines changed

src/control/cam_comp.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -145,8 +145,8 @@ subroutine cam_init(caseid, ctitle, model_doi_url, &
145145
integer, intent(in) :: ref_ymd ! Reference date (YYYYMMDD)
146146
integer, intent(in) :: ref_tod ! Reference time of day (sec)
147147

148-
type(cam_out_t) :: cam_out ! Output from CAM to surface
149-
type(cam_in_t) :: cam_in ! Merged input state to CAM
148+
type(cam_out_t), intent(inout) :: cam_out ! Output from CAM to surface
149+
type(cam_in_t) , intent(inout) :: cam_in ! Merged input state to CAM
150150

151151
! Local variables
152152
character(len=cs) :: filein ! Input namelist filename

src/cpl/nuopc/atm_comp_nuopc.F90

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -43,7 +43,6 @@ module atm_comp_nuopc
4343
use cam_instance , only : cam_instance_init, inst_suffix, inst_index
4444
use cam_comp , only : cam_init, cam_run1, cam_run2, cam_run3, cam_run4, cam_final
4545
use cam_comp , only : cam_timestep_init, cam_timestep_final
46-
use physics_types , only : cam_out_t, cam_in_t
4746
use physics_types , only : cam_out, cam_in
4847
! use radiation , only : nextsw_cday !uncomment once radiation has been CCPP-ized -JN
4948
use cam_logfile , only : cam_set_log_unit, iulog

0 commit comments

Comments
 (0)