X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Funres%2Fsrc%2FCOMMON.TIME1;h=8cbc32799ff2ee004537240bf292be2eb3e2a6ed;hb=9ab6a6c94ffa93357b777d7a01615bc2cb964622;hp=b6e9c88804ba07b30e7d6c2a0d9200989c428e04;hpb=478a9d9a1c99eb3f4bc4ca676ff3162bdd01d633;p=unres.git diff --git a/source/cluster/unres/src/COMMON.TIME1 b/source/cluster/unres/src/COMMON.TIME1 index b6e9c88..8cbc327 100644 --- a/source/cluster/unres/src/COMMON.TIME1 +++ b/source/cluster/unres/src/COMMON.TIME1 @@ -1,4 +1,4 @@ - DOUBLE PRECISION BATIME,TIMLIM,STIME,PREVTIM,SAFETY + double precision BATIME,TIMLIM,STIME,PREVTIM,SAFETY INTEGER ISTOP COMMON/TIME1/STIME,TIMLIM,BATIME,PREVTIM,SAFETY COMMON/STOPTIM/ISTOP