Skip to content

Commit b210815

Browse files
committed
fix misplaced USE_COSP ifdef
1 parent 7dd6cbd commit b210815

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/physics/cam/cospsimulator_intr.F90

+1-1
Original file line numberDiff line numberDiff line change
@@ -441,6 +441,7 @@ subroutine cospsimulator_intr_register()
441441
use cam_history_support, only: add_hist_coord
442442
!---------------------------------------------------------------------------
443443

444+
#ifdef USE_COSP
444445
! Set number of levels used by COSP to the number of levels used by
445446
! CAM's cloud macro/microphysics parameterizations.
446447
nlay = pver - ktop + 1
@@ -449,7 +450,6 @@ subroutine cospsimulator_intr_register()
449450
! Set COSP coordinate arrays
450451
call setcosp2values()
451452

452-
#ifdef USE_COSP
453453
! Define coordinate variables for COSP outputs.
454454
if (lisccp_sim .or. lmodis_sim) then
455455
call add_hist_coord('cosp_prs', nprs_cosp, 'COSP Mean ISCCP pressure', &

0 commit comments

Comments
 (0)