Lines Matching full:results
7 integer :: results(100) variable
13 results(count) = j1
21 results(count) = 100*j1 + 10*j2 + j3
25 results(count) = 10*j3 + j4
33 results(count) = 100*j1 + 10*j2 + j3
36 results(count) = 10*j3 + j4
42 results(count) = 10*j1 + j2
46 5 results(count) = j1
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)