From b57ebfd04e71bd5edcfe2b5cccda4f28b8f0d6eb Mon Sep 17 00:00:00 2001 From: Dustin Swales Date: Tue, 18 Feb 2020 14:49:30 -0700 Subject: [PATCH] Revert earleir change. --- physics/rrtmgp_lw_cloud_sampling.F90 | 1 - 1 file changed, 1 deletion(-) diff --git a/physics/rrtmgp_lw_cloud_sampling.F90 b/physics/rrtmgp_lw_cloud_sampling.F90 index c0c319449..51f512853 100644 --- a/physics/rrtmgp_lw_cloud_sampling.F90 +++ b/physics/rrtmgp_lw_cloud_sampling.F90 @@ -106,7 +106,6 @@ subroutine rrtmgp_lw_cloud_sampling_run(doLWrad, nCol, nLev, ipsdlw0, icseed_lw, ! Call McICA select case ( iovrlw ) - case(0) ! Maximumn-random case(1) call check_error_msg('rrtmgp_lw_cloud_sampling_run',sampled_mask_max_ran(rng3D,cld_frac,cldfracMCICA))