diff --git a/CHANGELOG.md b/CHANGELOG.md index 33c9f9cf8461..e62584cdc79b 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -28,6 +28,12 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0 ### Deprecated +## [2.46.2] - 2024-05-31 + +### Removed + +- Remove excessive print statements in `generic/OpenMP_Support.F90` + ## [2.46.1] - 2024-05-10 ## Fixed diff --git a/CMakeLists.txt b/CMakeLists.txt index b1c83ba0ba64..b2bd7cd2619a 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -8,7 +8,7 @@ endif () project ( MAPL - VERSION 2.46.1 + VERSION 2.46.2 LANGUAGES Fortran CXX C) # Note - CXX is required for ESMF # Set the possible values of build type for cmake-gui diff --git a/generic/OpenMP_Support.F90 b/generic/OpenMP_Support.F90 index c2742a6c9a6c..9cdf0a3ac1c8 100644 --- a/generic/OpenMP_Support.F90 +++ b/generic/OpenMP_Support.F90 @@ -537,8 +537,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], &