Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly
Sign up
Appearance settings

Commit 88f38dd

Browse files
improved aesthetics around '&'
1 parent 1300b43 commit 88f38dd

File tree

1 file changed

+12
-12
lines changed

1 file changed

+12
-12
lines changed

‎src/tests/string/test_string_functions.f90‎

Lines changed: 12 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -355,8 +355,8 @@ subroutine test_replace_all
355355
call check(replace_all(test_string_1, "TAT", "ATA") == &
356356
& "mutate DNA sequence: GTATACGATAGCCGTAATATA", &
357357
& "replace_all: 1 string_type & 2 character scalar, test case 1")
358-
call check(replace_all("mutate DNA sequence: AGAGAGCCTAGAGAGAG", test_pattern_2, &
359-
& "GC") == "mutate DNA sequence: GCGAGCCTGCGGCG", &
358+
call check(replace_all("mutate DNA sequence: AGAGAGCCTAGAGAGAG", test_pattern_2, "GC") == &
359+
& "mutate DNA sequence: GCGAGCCTGCGGCG", &
360360
& "replace_all: 1 string_type & 2 character scalar, test case 2")
361361
call check(replace_all("mutate DNA sequence: GTTATCGTATGCCGTAATTAT", "TA", &
362362
& test_replacement_2) == "mutate DNA sequence: GTagaTCGagaTGCCGagaATagaT", &
@@ -392,20 +392,20 @@ subroutine test_count
392392
& 'count: all 2 as string_type, test case 2')
393393
call check(count(test_string_2, test_pattern_1, .false.) == 1, &
394394
& 'count: all 2 as string_type, test case 3')
395-
call check(all(count([test_string_2, test_string_2, test_string_1], [test_pattern_2, &
396-
& test_pattern_2, test_pattern_1], [.true., .false., .false.]) == [2, 1, 3]), &
397-
& 'count: all 2 as string_type, test case 4')
398-
call check(all(count([[test_string_1, test_string_2], [test_string_1, test_string_2]], [[test_pattern_1, &
399-
& test_pattern_2], [test_pattern_2, test_pattern_1]], .true.) == [[4, 2], [1, 1]]), &
400-
& 'count: all 2 as string_type, test case 5')
395+
call check(all(count([test_string_2, test_string_2, test_string_1], &
396+
& [test_pattern_2, test_pattern_2, test_pattern_1], [.true., .false., .false.]) == &
397+
& [2, 1, 3]), 'count: all 2 as string_type, test case 4')
398+
call check(all(count([[test_string_1, test_string_2], [test_string_1, test_string_2]], &
399+
& [[test_pattern_1, test_pattern_2], [test_pattern_2, test_pattern_1]], .true.) == &
400+
& [[4, 2], [1, 1]]), 'count: all 2 as string_type, test case 5')
401401

402402
! 1 string_type and 1 character scalar
403403
call check(all(count(test_string_1, ["AGA", "GTC"], [.true., .false.]) == [4, 2]), &
404404
& 'count: 1 string_type and 1 character scalar, test case 1')
405-
call check(all(count([test_string_1, test_string_2], ["CTC", "GTC"], [.true., .false.]) &
406-
& == [0, 3]), 'count: 1 string_type and 1 character scalar, test case 2')
407-
call check(all(count(["AGAGAGAGTCCTGTCGAGA", "AGAGAGAGTCCTGTCGAGA"], test_pattern_1, &
408-
& [.false., .true.]) == [3, 4]), &
405+
call check(all(count([test_string_1, test_string_2], ["CTC", "GTC"], [.true., .false.]) == &
406+
& [0, 3]), 'count: 1 string_type and 1 character scalar, test case 2')
407+
call check(all(count(["AGAGAGAGTCCTGTCGAGA", "AGAGAGAGTCCTGTCGAGA"], &
408+
& test_pattern_1, [.false., .true.]) == [3, 4]), &
409409
& 'count: 1 string_type and 1 character scalar, test case 3')
410410
call check(count(test_string_1, "GAG") == 4, &
411411
& 'count: 1 string_type and 1 character scalar, test case 4')

0 commit comments

Comments
(0)

AltStyle によって変換されたページ (->オリジナル) /