Return to timtst.f CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / usr.lib / libU77 / test

Annotation of 43BSDTahoe/usr.lib/libU77/test/timtst.f, revision 1.1.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.