Skip to content

Commit ba8f5dc

Browse files
author
Damian Rouson
committed
Fix typo in teams_subset.f90 test
1 parent 1b86782 commit ba8f5dc

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/tests/unit/teams/teams_subset.f90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@ program teams_subset
99
type(team_type) team
1010

1111
associate( initial_team_image => this_image())
12-
associate( myteam => merge(1,2,any(initial_team_image==[1,num_images()]) )
12+
associate( myteam => merge(1,2,any(initial_team_image==[1,num_images()])) )
1313

1414
form team (myteam, team)
1515

@@ -22,7 +22,7 @@ program teams_subset
2222
min_image = [initial_team_image, this_image()]
2323
call co_min(min_image)
2424
end team
25-
call assert( all(min_image==1), "team minimum image number is 1" )
25+
call assert( all(min_image==1), "minimum image number in team is 1" )
2626
call assert( all(max_image==[num_images(), 2]), "team maximum images numbers is num_images() or 2")
2727
end block
2828
end if

0 commit comments

Comments
 (0)