c..common block for timers
c..for getting the date and time out of the machine
       character*8       atim
       character*9       adat
       common  /datime/  adat,atim

c..for figuring out how much cpu time was spent
       double precision  timtot
       integer           hours,minuts,secs,msecs
       common /timers/   timtot,hours,minuts,secs,msecs