X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-NEWSC-NEWCORR%2Finclude_unres%2FCOMMON.TIME1;fp=source%2Fwham%2Fsrc-NEWSC-NEWCORR%2Finclude_unres%2FCOMMON.TIME1;h=f7f48499905d16d81943b872ab71c4c09f9090f1;hb=bfe2762d1d1d415d14ceffb0bce43ca426db6bb8;hp=0000000000000000000000000000000000000000;hpb=8f4b74d4d25238eaf813420dc03adec7379a7f64;p=unres.git diff --git a/source/wham/src-NEWSC-NEWCORR/include_unres/COMMON.TIME1 b/source/wham/src-NEWSC-NEWCORR/include_unres/COMMON.TIME1 new file mode 100644 index 0000000..f7f4849 --- /dev/null +++ b/source/wham/src-NEWSC-NEWCORR/include_unres/COMMON.TIME1 @@ -0,0 +1,13 @@ + DOUBLE PRECISION BATIME,TIMLIM,STIME,PREVTIM,SAFETY,RSTIME + INTEGER WhatsUp,ndelta + logical cutoffviol,cutoffeval,llocal + COMMON/TIME1/STIME,TIMLIM,BATIME,PREVTIM,SAFETY,RSTIME + COMMON/STOPTIM/WhatsUp,ndelta,cutoffviol,cutoffeval,llocal + double precision t_func,t_grad,t_fhel,t_fbet,t_ghel,t_gbet,t_viol, + & t_gviol,t_map,t_alamap,t_betamap + integer n_func,n_grad,n_fhel,n_fbet,n_ghel,n_gbet,n_viol,n_gviol, + & n_map,n_alamap,n_betamap + common /timing/ t_func,t_grad,t_fhel,t_fbet,t_ghel,t_gbet,t_viol, + & t_gviol,t_map,t_alamap,t_betamap, + & n_func,n_grad,n_fhel,n_fbet,n_ghel,n_gbet,n_viol,n_gviol, + & n_map,n_alamap,n_betamap