We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent ac8c0bc commit bbbc215Copy full SHA for bbbc215
tests/test_fortran_strings.f90
@@ -81,4 +81,7 @@ program test
81
c1="Ironman,Thor,Thanos,Black Panther,Winter Soldier"
82
if(str_swapcase(str_swapcase(c1)).ne.c1)call exit(1)
83
84
+ c1="accessg,accesse,aigfs,ecmwfd,ecmwfe,gefs,gefs"
85
+ if(str_uniq(c1,",").ne.c1)call exit(1)
86
+
87
end program test
0 commit comments