diff --git a/physics/cu_gf_driver.F90 b/physics/cu_gf_driver.F90 index 43e82a745..a9cecb5ce 100644 --- a/physics/cu_gf_driver.F90 +++ b/physics/cu_gf_driver.F90 @@ -50,14 +50,14 @@ subroutine cu_gf_driver_init(imfshalcnv, imfshalcnv_gf, imfdeepcnv, & ! end if ! *DH temporary - ! Consistency checks - if (.not. (imfshalcnv == imfshalcnv_gf .or. & - & imfdeepcnv == imfdeepcnv_gf)) then - write(errmsg,'(*(a))') 'Logic error: namelist choice of', & - & ' convection is different from Grell-Freitas scheme' - errflg = 1 - return - end if + ! ! Consistency checks + ! if (.not. (imfshalcnv == imfshalcnv_gf .or. & + ! & imfdeepcnv == imfdeepcnv_gf)) then + ! write(errmsg,'(*(a))') 'Logic error: namelist choice of', & + ! & ' convection is different from Grell-Freitas scheme' + ! errflg = 1 + ! return + ! end if end subroutine cu_gf_driver_init