Searched refs:idat (Results 1 - 2 of 2) sorted by relevance
| /haiku-buildtools/legacy/gcc/libf2c/libU77/ |
| H A D | u77-test.f | 45 integer i, j, k, ltarray (9), idat (3), count, rate, count_max, variable
215 call idate (idat)
216 write (6,*) 'IDATE (date,month,year): ',idat
218 if (i/=idat(2) .or. j/=idat(1) .or. k/=mod(idat(3),100)) then
226 call itime (idat)
227 write (6,*) 'ITIME (hour,minutes,seconds): ', idat
|
| /haiku-buildtools/gcc/libgomp/testsuite/libgomp.fortran/ |
| H A D | jacobi.f | 33 common /idat/ n,m,mits,mtemp common in program:main
84 common /idat/ n,m,mits,mtemp common in subroutine:driver
|
Completed in 97 milliseconds