diff --git a/src/summary.F90 b/src/summary.F90 index ab69f35ccb..56c31452b4 100644 --- a/src/summary.F90 +++ b/src/summary.F90 @@ -186,6 +186,7 @@ contains region_spec = trim(region_spec) // " )" case (OP_COMPLEMENT) region_spec = trim(region_spec) // " ~" + case (OP_INTERSECTION) case (OP_UNION) region_spec = trim(region_spec) // " ^" case default