X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Funres%2Fsrc%2Ftiming.F;h=9bca35368f099784ced88b8abf93a0cf35f91cc0;hb=refs%2Fheads%2Fhomology;hp=ecab9b4eb574356abe2cdceb477a511b6087d457;hpb=574727f09f087599aa6685480f1b65a435d73323;p=unres.git diff --git a/source/cluster/unres/src/timing.F b/source/cluster/unres/src/timing.F index ecab9b4..9bca353 100644 --- a/source/cluster/unres/src/timing.F +++ b/source/cluster/unres/src/timing.F @@ -170,6 +170,7 @@ C Next definitions for Linux C========================================================================= C subroutine dajczas(rntime,hrtime,mintime,sectime) + include 'DIMENSIONS' include 'COMMON.IOUNITS' real*8 rntime,hrtime,mintime,sectime hrtime=rntime/3600.0D0