diff --git a/CHANGELOG.md b/CHANGELOG.md
index 8c27f717a10b..1ad20f84be8e 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -15,6 +15,8 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ### Removed
 
+- Remove extra print statement
+
 ### Deprecated
 
 ## [2.40.4] - 2023-09-14
diff --git a/generic/OpenMP_Support.F90 b/generic/OpenMP_Support.F90
index 329559994cdd..3955731c565a 100644
--- a/generic/OpenMP_Support.F90
+++ b/generic/OpenMP_Support.F90
@@ -532,8 +532,7 @@ function make_subgridcomps(GridComp, run_entry_points, num_grids, unusable, rc)
 
         call ESMF_GridCompGet(GridComp, config=CF, name=comp_name, _RC)
         call ESMF_InternalStateGet(GridComp, labelList=labels, _RC)
-        if(myPET==0) print*,__FILE__,__LINE__, 'internal states labels : <',trim(comp_name), (trim(labels(i)),i=1,size(labels)), '>'
-        print*,__FILE__,__LINE__, 'splitting component: <',trim(comp_name),'>'
+
         do i = 1, num_grids
           associate (gc => subgridcomps(i) )
             gc = ESMF_GridCompCreate(name=trim(comp_name), config=CF, petlist=[myPet], &