X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Funres%2Fsrc%2FCOMMON.TIME1;h=8cbc32799ff2ee004537240bf292be2eb3e2a6ed;hb=b9c2b8110f11bf7d97e62bbfd6f9f123e957badd;hp=b6e9c88804ba07b30e7d6c2a0d9200989c428e04;hpb=a45ce81aae2c857c30b821e39e45a7a08356de4d;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