diff --git a/physics/PBL/MYNN_EDMF/module_bl_mynn.F90 b/physics/PBL/MYNN_EDMF/module_bl_mynn.F90 index cc7a47ce6..8f0f1cf1d 100644 --- a/physics/PBL/MYNN_EDMF/module_bl_mynn.F90 +++ b/physics/PBL/MYNN_EDMF/module_bl_mynn.F90 @@ -454,8 +454,8 @@ SUBROUTINE mynn_bl_driver( & ! = 3; Level 3 ! SGT: Changed this to use assumed shape arrays (dimension(:,:,:)) with no "optional" arguments -! to prevent a crash on Cheyenne. Do not change it back without testing if the code runs -! on Cheyenne with the GNU compiler. +! to prevent a crash on Derecho. Do not change it back without testing if the code runs +! on Derecho with the GNU compiler. real(kind_phys), intent(in) :: delt real(kind_phys), dimension(:), intent(in) :: dx