Searched refs:tarray1 (Results 1 - 1 of 1) sorted by relevance
/haiku-buildtools/legacy/gcc/libf2c/libU77/ |
H A D | u77-test.f | 47 real tarray1(2), tarray2(2), r1, r2 variable 165 r1 = etime (tarray1) 173 if (.not. issum (r1, tarray1(1), tarray1(2))) then 175 + r1, ' /= ', tarray1(1), '+', tarray1(2) 185 + r1, tarray1 195 call etime (tarray1, r1) 196 if (.not. issum (r1, tarray1(1), tarray1( [all...] |
Completed in 39 milliseconds