Return to timtst.f CVS log

Up to [CSRG BSD Unix] / 43BSDReno / lib / libU77 / test

Annotation of 43BSDReno/lib/libU77/test/timtst.f, revision 1.1

1.1     ! root        1:        character*24 ctime, fdate
        !             2:        integer time, tl(9), tgm(9)
        !             3:        write(*,*) ctime(time()), fdate()
        !             4:        call ltime(time(), tl)
        !             5:        call gmtime(time(), tgm)
        !             6:        write(*,*) tl, tgm
        !             7:        end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.