Lines Matching full:count

8   integer :: count  variable
9   count = 0
12       count = count + 1
13       results(count) = j1
20           count = count + 1
21           results(count) = 100*j1 + 10*j2 + j3
24               count = count + 1
25               results(count) = 10*j3 + j4
32             count = count + 1
33             results(count) = 100*j1 + 10*j2 + j3
35               count = count + 1
36               results(count) = 10*j3 + j4
41     count = count + 1
42     results(count) = 10*j1 + j2
45     count = count + 1
46 5   results(count) = j1
48     count = count + 1
49 6   results(count) = j1
50   if (count == 34 .and. sum(results(1:count)) == 3739) then
53     print *, 'FAIL:', count, sum(results(1:count)), results(1:count)