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