Skip to content

Commit e88c922

Browse files
committed
refactor: replace Rank 7 with Rank > 7
1 parent 0d4fc91 commit e88c922

File tree

1 file changed

+18
-18
lines changed

1 file changed

+18
-18
lines changed

test/stats/test_mean_f03.fypp

Lines changed: 18 additions & 18 deletions
Original file line numberDiff line numberDiff line change
@@ -72,7 +72,7 @@ contains
7272
if (allocated(error)) return
7373

7474
#:else
75-
call skip_test(error, "Rank 7 is not supported")
75+
call skip_test(error, "Rank > 7 is not supported")
7676
#:endif
7777
end subroutine
7878

@@ -86,7 +86,7 @@ contains
8686
if (allocated(error)) return
8787

8888
#:else
89-
call skip_test(error, "Rank 7 is not supported")
89+
call skip_test(error, "Rank > 7 is not supported")
9090
#:endif
9191
end subroutine
9292

@@ -105,7 +105,7 @@ contains
105105
#:endfor
106106

107107
#:else
108-
call skip_test(error, "Rank 7 is not supported")
108+
call skip_test(error, "Rank > 7 is not supported")
109109
#:endif
110110
end subroutine
111111

@@ -126,7 +126,7 @@ contains
126126
#:endfor
127127

128128
#:else
129-
call skip_test(error, "Rank 7 is not supported")
129+
call skip_test(error, "Rank > 7 is not supported")
130130
#:endif
131131
end subroutine
132132

@@ -142,7 +142,7 @@ contains
142142
if (allocated(error)) return
143143

144144
#:else
145-
call skip_test(error, "Rank 7 is not supported")
145+
call skip_test(error, "Rank > 7 is not supported")
146146
#:endif
147147
end subroutine
148148

@@ -161,7 +161,7 @@ contains
161161
#:endfor
162162

163163
#:else
164-
call skip_test(error, "Rank 7 is not supported")
164+
call skip_test(error, "Rank > 7 is not supported")
165165
#:endif
166166
end subroutine
167167
#:endfor
@@ -178,7 +178,7 @@ contains
178178
if (allocated(error)) return
179179

180180
#:else
181-
call skip_test(error, "Rank 7 is not supported")
181+
call skip_test(error, "Rank > 7 is not supported")
182182
#:endif
183183
end subroutine
184184

@@ -192,7 +192,7 @@ contains
192192
if (allocated(error)) return
193193

194194
#:else
195-
call skip_test(error, "Rank 7 is not supported")
195+
call skip_test(error, "Rank > 7 is not supported")
196196
#:endif
197197
end subroutine
198198

@@ -211,7 +211,7 @@ contains
211211
#:endfor
212212

213213
#:else
214-
call skip_test(error, "Rank 7 is not supported")
214+
call skip_test(error, "Rank > 7 is not supported")
215215
#:endif
216216
end subroutine
217217

@@ -227,7 +227,7 @@ contains
227227
#:endfor
228228

229229
#:else
230-
call skip_test(error, "Rank 7 is not supported")
230+
call skip_test(error, "Rank > 7 is not supported")
231231
#:endif
232232
end subroutine
233233

@@ -243,7 +243,7 @@ contains
243243
if (allocated(error)) return
244244

245245
#:else
246-
call skip_test(error, "Rank 7 is not supported")
246+
call skip_test(error, "Rank > 7 is not supported")
247247
#:endif
248248
end subroutine
249249

@@ -262,7 +262,7 @@ contains
262262
#:endfor
263263

264264
#:else
265-
call skip_test(error, "Rank 7 is not supported")
265+
call skip_test(error, "Rank > 7 is not supported")
266266
#:endif
267267
end subroutine
268268
#:endfor
@@ -279,7 +279,7 @@ contains
279279
if (allocated(error)) return
280280

281281
#:else
282-
call skip_test(error, "Rank 7 is not supported")
282+
call skip_test(error, "Rank > 7 is not supported")
283283
#:endif
284284
end subroutine
285285

@@ -293,7 +293,7 @@ contains
293293
if (allocated(error)) return
294294

295295
#:else
296-
call skip_test(error, "Rank 7 is not supported")
296+
call skip_test(error, "Rank > 7 is not supported")
297297
#:endif
298298
end subroutine
299299

@@ -312,7 +312,7 @@ contains
312312
#:endfor
313313

314314
#:else
315-
call skip_test(error, "Rank 7 is not supported")
315+
call skip_test(error, "Rank > 7 is not supported")
316316
#:endif
317317
end subroutine
318318

@@ -328,7 +328,7 @@ contains
328328
#:endfor
329329

330330
#:else
331-
call skip_test(error, "Rank 7 is not supported")
331+
call skip_test(error, "Rank > 7 is not supported")
332332
#:endif
333333
end subroutine
334334

@@ -344,7 +344,7 @@ contains
344344
if (allocated(error)) return
345345

346346
#:else
347-
call skip_test(error, "Rank 7 is not supported")
347+
call skip_test(error, "Rank > 7 is not supported")
348348
#:endif
349349
end subroutine
350350

@@ -363,7 +363,7 @@ contains
363363
#:endfor
364364

365365
#:else
366-
call skip_test(error, "Rank 7 is not supported")
366+
call skip_test(error, "Rank > 7 is not supported")
367367
#:endif
368368
end subroutine
369369
#:endfor

0 commit comments

Comments
 (0)